本文整理自网络，侵删。
with…do语句的用法
with…do语句用来指定一个块中的字段（记录的或者对象的）、属性和方法所属的记录或者对象。Delphi初学者可能已经习惯了如下的代码书写格式：
var
Button: TButton;
begin
Button := TButton.Create(Self);
Button.Parent := Self;
Button.Left := 50;
Button.Top := 50;
……
end;
每行都写一个Button是否让你感觉厌烦。Object Pascal提供它特有的with…do语句，可以帮你消除这个烦恼。上面的代码可以写为：
var
Button: TButton;
begin
Button := TButton.Create(Self);
with Button do {编译器会知道下面的三个属性属于Button}
begin
Parent := Self;
Left := 50;
Top := 50;
……
end;
end;
with…do中可以包含多个记录或者对象，用逗号隔开。with…do也可以嵌套使用。
相关阅读 >>
Delphi pchar和array [0..255] of char的区别
Delphi dbnavigator1 删除时弹出确认对话框
更多相关阅读请进入《Delphi》频道 >>
