怎样防止form的多次显示？

[5201314]

在一个程序中怎样防止一个form的多次显示？

[halfdream]

你要问的实际上是为了防止创建多个FORM吧？
创建之前检查一下是否产生了FORM的实例。

[twoy2000]

Begin
if not Assigned(YourForm) then //检查有无实例。
YourForm:=TModel.Create(Application); //没有则创建。
YourForm.Show; //窗体显示。
end;
记住:
在FormClose中要
begin
YourForm.Action:=caFree;
end;
在FormDestroy中要
begin
YourForm:=nil;
end;

[AP]

在创建窗口之前，检查是否有该类型的子窗口。