delphi中怎么判断一个窗口是否已经打开

2025-02-05 19:47:15

推荐回答（2个）

回答1：

我一般用show或ShowModal；现声明一个公共变量 var i :integer; 然后在show或ShowModal付给它值
procedure TForm2.Form2_show;
begin
form2 :=TForm2.Create(application);
try
form2.ShowModal;
i :=1;
finally
form2.Free;
end;
end;
然后if i :=1 then
begin
(你要写的代码)
end;
这样就可以了

回答2：

不懂delphi
这个原理不知道可以不
窗体对象是不是为空不就可以判断了