如何控制是否显示窗体

[icemanpro]

在窗体的create事件中，如何写代码控制本窗体是否显示？

[shuaialang]

  Application.CreateForm(TForm1, Form1);
  Application.ShowMainForm:=False;
  Application.Run;

[willflyz]

楼上的是在工程文件里面写的，如果你要写在FormCreate事件里面Application.ShowMainForm := False;也是可以的。

[林石公]

Form有个visiable属性试试看

[huaihuai1110]

procedure TForm.FormCreate;
begin
  Visible := {是否显示(Boolean)};
end;

or

procedure TForm.FormShow;
begin
  Hide;
end;

[coderee]

学习。

[piaolingfeihu]

在create第一句加上
Application.ShowMainForm := False;，或者在
view source中像一楼那样添加，都可以的！

[wxsan]

有2中情况：

1、直接写死的：
就是不用在create事件中接收参数，直接将本窗口隐藏。
Self.Visible := False;

2、带参数的：
就是从外部接收一个参数，根据参数状态，决定是否隐藏本窗口。
if gbParams = True then
Self.Visible := True
else Self.Visible := False;

说明：gbParams参数可以声明在本单元的Public中，这样外面就可以访问到；
也可以放在published下面作为本窗体类的一个属性，当然这个稍微比
直接放在public中麻烦一些。