delphi 怎么结束程序的有关问题

delphi 如何结束程序的问题？
我想在TForm1.FormCreate(Sender:   TObject);里结束程序怎么办？

[解决办法]
用Halt
[解决办法]
procedure TForm1.FormCreate(Sender: TObject);
begin
application.Terminate;
end;