为何在Create方法中不可以用close??

Question

在Delphi7 中，在Form的Create方法为：procedure TForm1.FormCreate(Sender:TObject);
begin
  ShowMessage('Starting..');
  close;
end;为什么显示了启动信息后，程序不关闭(不执行close语句)，试过多次也是这样。

Answer 1

要执行Close的操作,可在OnShow事件中写入,在OnCreate事件中由于数据还未初始化,所以无法执行该操作.不过可以用发送消息的方法来实现的:SendMessage(Application.Handle,WM_CLOSE,0,0);

Answer 2

对象都还未创建,如何关闭?直接终止ApplcaitonApplication.Terminate;

Answer 3

同上，用APPLICATION全局变量来做会没有问题