delphi with 语句的妙用

本文整理自网络，侵删。

 delphi with 语句的妙用
//一般写法
var
MyForm1: TForm1;
begin
MyForm1 := TForm1.Create(nil);
MyForm1.ShowModal;
MyForm1.Free;
end;
--------------------------------------------------------------------------------

//用 with 语句重写
with TForm1.Create(nil) do begin
ShowModal;
Free;
end;
 

相关阅读 >>

Delphi image上文字平滑移动

Delphi压缩与解压_不需要特别的控件

Delphi xe的firemonkey获取当前文件所在路径的方法

Delphi以鼠标为中心缩放图片以及拖动（采用区域抠图拉伸的方式）

Delphi 计算l两个日期的时间间隔月数，月数差

Delphi deletefiles 删除目录下多个文件

Delphi中messagebox用法

Delphi 文件夹操作

Delphi 获得idhttp redirect后的url

Delphi 缓冲文件流-tbufferedfilestream tfilestream 性能测试

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi with 语句的妙用