如何判断一个非子窗体已经创建,为何我用findwindow 在子窗体未没创建时确不为0 了?
代码:
begin
if FindWindow('tfrm1','frm1') = 0 then
begin
frm1:=Tfrm1.Create(nil);
frm1.Parent := Panel1;
frm1.Show;
end
else
showmessage(IntToStr(FindWindow('tfrmPMC1','frmPMC1')));
end;
为何上述代码show 出来的不是0?
代码:
begin
if FindWindow('tfrm1','frm1') = 0 then
begin
frm1:=Tfrm1.Create(nil);
frm1.Parent := Panel1;
frm1.Show;
end
else
showmessage(IntToStr(FindWindow('tfrmPMC1','frmPMC1')));
end;
为何上述代码show 出来的不是0?
if Assigned(frm1)
if not Assigned(frm1) then
begin
frm1:=Tfrm1.Create(nil);
frm1.Parent := Panel1;
frm1.Show;
end;
当所frm1 关闭后,在没有关闭主程序的情况下,提示frm1 不为nil。