摘要载入中… 请稍等…
内容载入中… 请稍等…
| ◎→ | 本类最新 |
|
在DELPHI中用线程排序 在Delphi中使用Queued Component 作非常规程序菜单掌握delphi 执行一个外部程序并等待它的完成 在应用程序中跟踪MOUSE的坐标 五子棋源代码 显示密码的原理 |
|
| ◎→相关资源 | |
| C语言入门视频教程 C#编程WinForm入门视频 Asp.net入门视频教程下载 VC++编程视频教程下载 VB窗体文章 HTML入门教程 Deiphi实例教程 Deiphi窗体文章 Deiphi数据库编程 Deiphi网络编程 Deiphi图形图象文章 Deiphi系统文件 | |
| ◎→ | 热门资源 |
| 图解Delphi 8 Eco 开发实战 用Delphi编写后台监控软件 用Delphi获取Windows及系统路径 用Delphi实现24位真彩色图标 用Delphi实现24位真彩色图标(2) 用Delphi实现24位真彩色图标(1) 用Delphi7.0实现漂亮的汉字窗口 |
|
with TfrmPassword.Create(nil)
do
try
ShowModal;
finally
Free;
end;
虽然这样的代码已经很简洁,但如果写个十七八个还是很讨厌的。利用类方法可以使其更简洁!
一行足以……
TfrmPassword = class(TForm)
...
public
{ Public declarations }
class f tion Execute: TModalResult;
end;
...
class function TfrmPassword.Execute:
TModalResult;
begin
with TfrmPassword.Create(nil)
do
try
Result := ShowModal;
finally
Release; //注意此处必须为release不能为free!
end;
end;
然后只用一行
TfrmPassword.Execute;
即可直接完成调用……是否很爽^_^
| 芯友网版权所有 1999-2006 | 著作权与商标声明 | 法律声明 | 服务条款 | 隐私声明 | 联系我们 |