With语句

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