该如何在主窗体 show 完之后。。。

Question

该如何在主窗体 show 完之后让程序自动在显示一个模式对话框呢？？
就像超级解霸和金山词霸里的每日一帖那样

Answer 1

在show事件后面写创建窗体语句。
application.creatform(tform,dialogform);
dialogform.show;

Answer 2

procedure TForm1.FormActivate(Sender: TObject);
begin
  form2.ShowModal;
end;

Answer 3

procedure TForm1.FormShow(Sender: TObject);
var
  dialogform:tform;
begin
  application.CreateForm(tform,dialogform);
  dialogform.show;end;