怎么判断一个窗体已创建?如用户最小化了,就不能再创建一次,因此怎么判断一个窗体已创建且没释放过,不能判断释放过的窗体,如 action;=cafree了,
解决方案 »
- 初学者,请各位高手看看这代码有什么错误?
- 这个问题较难:怎样用DELPHI将MP3声音文件保存到ACCESS数据库中?并且将表中的MP3声音写回文件?
- 发送信息时如何隐藏自已的IP
- 高分求助!急!intraweb程序之间的数据传递问题
- 怎么调用windows的计算器和写字板?
- 怎样用edit1.text的内容作为数据库名称来建立sql server数据库
- 高手请帮帮忙!
- 怎样让程序启动的更快!?
- 在Delphi中﹐用什么方法可以將一張表中(記錄)數據復制到另一張表中﹖
- 用mscomm从串口收数据,我怎么用oncomm事件收数据?
- application 和clxapplication有什么区别呀!
- 我想问如何从tchart图中去掉异常大或异常小的数据点或给曲线点定一个上下限。
判断该变量值来判断是否释放窗体
在窗体的oncreate时间
和释放时间各设置一次
Form1 := TForm1.Create(Application);
Form1.show;
action:=cafree;
Form1 := nil;
呵呵,如果不管form2 是否为nil 都能判断出来是否没释放过可以采用
如下
var
i:integer;
begin
for i:=0 to screen.FormCount-1 do
begin
if (screen.Forms[i]<>self) then
begin
screen.forms[i].free;
end;
end;
end;