Delphi 窗体关闭问题

Question

我要在窗体的OnCreate或OnShow事件里面关闭本窗体，应该怎么样实现？请各位帮下忙，我卡在这里好久了，急。

Answer 1

一個是 CreateWindow , 一個是 ShowWindow 
為什麼要這樣處理呢？？

Answer 2

在窗体close里面写
application.Terminate;
或者在onshow里写form.colse;
form.hide;

Answer 3

可以在onshow中Close可以实现关闭本窗体不过OnCreate中好像不能Close;

Answer 4

create里好像不能close,樓主想法有點奇怪

Answer 5

隐藏即可(form1.hide),为何要关闭?

Answer 6

我是在OnCreate事件中打开了另外的窗体，我是想在关闭子窗体的同时也让主窗体关闭。

Answer 7

program Project1;uses
  Forms,
  Unit1 in 'Unit1.pas' {Form1};{$R *.res}begin
  Application.Initialize;
  Application.ShowMainForm:=false;  // add this line
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.
如果隐藏窗体的话如果关闭窗体的话。。太多了。
procedure TForm1.FormCreate(Sender: TObject);
begin
    application.Terminate
end;

Answer 8

shaoyiping的方法可行，非常感谢，linkerchen 的方法我也以前试过，也可以，但是效果不怎么好，同样感谢！谢谢各位的回贴！