$ WithStatement = WITH ident ":" qualident {, ident ":" qualident } DO StatementSequence END WITH ";"
Оператор With позволяет избегать использования сложных квалифицированных идентификаторов при доступе к полям, свойствам и методам объектов. С помощью оператора With задаются синонимы квалифицированных идентификаторов, действующие в блоке ограничиваемом данным оператором.
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;
См. также: