$ WithStatement = WITH ident ":" qualident {, ident ":" qualident } DO StatementSequence END WITH ";"
The With statement enables the user to avoid using complex qualified identifiers to access object fields, properties, and methods. Use the With statement to specify the qualified identifiers synonyms active in the block, which is restricted by the defined statement.
Sub WithSample;
Begin
With q: Label1.Font Do
q.Bold := True;
q.Color := GxColor.FromName("Red");
q.Size := 15;
q.Strikethrough := True;
End With;
End Sub WithSample;
See also: