With语句是一种用于简化代码的语句。如果你要访问一个记录类型变量(或一个对象),用with语句就不必每次重复变量的名字。例如对于以下的记录类型代码:
type Date = Record Year: integer; Month: byte; Day: byte; end; var Birthday: Date; begin Birthday.Year :=1997; Birthday.Month :=2; Birthday.Day :=14; //use with method with Birthday do begin Year :=1997; Month :=2; Day :=14; end