公用函数:
procedure CloseForm(Form:TForm);
begin
form.Close();
endonclick:
CloseForm(self);
procedure CloseForm(Form:TForm);
begin
form.Close();
endonclick:
CloseForm(self);
解决方案 »
- 问个Delphi关于SEH的问题
- 如何动态调用ActiveFormProj1.ocx,并且ActinForm放到主程序的一个Panel里面显示?
- 我想问一下,关于自动点菜系统中的。自动点菜这一功能怎么实现阿?
- some info in csdn
- 请问什么地方有增强功能的StatusBar控件下载,比如有进程条,可加入图标,可显示键盘状态等。
- 刷新初始化窗体
- 请问如何分行?
- 谁知道哪有最新的delphi代码编写规范标准。顺便问一句,在大家写代码时有没有按标准写。
- sql语句格式有什么不同的吗?
- !!!救命。。为什么我在程序中加了一个字符串加密函数以后出现“out of memory"的错误。。
- 自定义控件如何在程序运行中改变大小?
- 急!请问有没有直接用于Delphi的CASE工具?
补充一点:调用的窗口是模态窗口。
procedure CloseForm(Form:TForm);
begin
//form.Close();
Form.Free;
或Form.Release;
endonclick:
CloseForm(self);
procedure CloseForm(Form:TForm);
begin
form.Close;
endonclick:
CloseForm(self);