Question

delphi里在用FormCreate创建窗体的时候，想执行一些代码，如何实现？

Form2作为程序运行时自动创建的第一个窗体，怎样才能在创建窗体的同时执行一些代码呢，比如我把showmessage('test');加入FormCreate函数中，运行时根本就没反应…只是显示form2窗口，并不弹出信息框。
procedure TForm2.FormCreate(Sender: TObject);
begin
showmessage('test');
end;
简而言之，如何做到在程序开始运行时，弹出form2以及'test’消息框呢？

Answer 1

思路有问题。
FormCreate只是在创建时做一些初始化工作，最好不要加入显示信息的代码。
如果希望在显示在创建完成后、显示窗体前做一些工作，可以考虑在OnShow事件中加入代码。

Answer 2

在主form的Object Inspector选event下边的onCreate，然后确定onCreate时运行你的onCreate过程

Answer 3

这个你试试吧!
procedure TForm1.FormCreate(Sender: TObject);
var Form2:TForm;
begin
Form2:=TForm.Create(nil) ;
Form2.Show;
showmessage('test');
end;
end.