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 中 tjpegimage 中的一处问题修复

Delphi三种弹窗

Delphi 虚拟键码对照表

Delphi实现注册表的操作

Delphi xe8 为image设置渐变效果

Delphi 数据库重置用户密码制作

Delphi 字符串替换函数[单元文件 sysutils]

Delphi tstrings 随机打乱

Delphi 取windows登录用户名

Delphi 根据特殊符号字符获取字符串前或后的字符

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

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