Difference between revisions of "As"

From Lazarus wiki
Jump to navigationJump to search
(Removed Object pascal again... was really guessing)
Line 14: Line 14:
 
here the Sender variable of type TObject is being cast as type TDBGrid
 
here the Sender variable of type TObject is being cast as type TDBGrid
  
As is a Pascal language extension ''compared to? presumably original ISO Pascal?''
+
As is an Object Pascal and a Borland Delphi extension.

Revision as of 10:44, 18 September 2012

As

The keyword as is used to cast (use one variable type as if it were another type)

procedure TmainForm.selectionGridDrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
     (Sender As TDBGrid).DefaultDrawColumnCell(Rect,DataCol,Column,State);
end;

here the Sender variable of type TObject is being cast as type TDBGrid

As is an Object Pascal and a Borland Delphi extension.