菜鸟级问题(20分)

实现带启动的窗体!
有两个窗体:FORM1,FORM2,在FORM1中有一个TIMER1
在程序运行时,让FORM1显示3秒中自动消失,从面显示FORM2上的内容,代码该怎么写?
THANK YOU !!!!!!!!!!!!!!!!!!!!!!!!!!!!

begin
Application.Initialize;
try
form2:=tform2.Create(application);//
form2.Show;//
form2.Update;//
finally//
frm_js.Close;//
Application.CreateForm(tform1, form1);
Application.CreateForm(tform2, form2);
Application.CreateForm(tform3, form3);

Application.Run;

procedure Tform2.FormClose(Sender: TObject
var Action: TCloseAction);
begin
sleep(2000);
end;

OK!!