最幼稚的问题快来看看(100分)

新手上路,望各位大侠指个明路,谢谢!
再帮我看看一下句子那里出错了,自己垃圾呀~~~
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.CreateForm(TForm2, Form2);
try
Application.CreateForm(TForm3, Form3);
form3.ShowModal;
form3.Free
except;
application.MessageBox(0,'不能创建加载窗体','发生错误',MB_OK + MB_ICONSTOP);
end;
Application.Run;
end.

begin
Application.Initialize;
try
Application.CreateForm(TForm3, Form3);
form3.Show;
form3.Update;
Application.ProcessMessages;
Application.CreateForm(TForm1, Form1);
Application.CreateForm(TForm2, Form2);
finally
form3.Free
end;
Application.Run;
end.

你需要在Uses中引用Windows单元还有就是Application.MessageBox的参数个数不对，示例代码如下：
program Project1;
uses
Forms,Windows,
Unit1 in 'Unit1.pas' {Form1},
Unit2 in 'Unit2.pas' {Form2},
Unit3 in 'Unit3.pas' {Form3};
{$R *.res}
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.CreateForm(TForm2, Form2);
try
Application.CreateForm(TForm3, Form3);
form3.ShowModal;
form3.Free
except;
application.MessageBox('不能创建加载窗体','发生错误',MB_OK + MB_ICONSTOP);
end;
Application.Run;
end.

除了application.MessageBox这个过程引用的参数不多别的没有问题
application.MessageBox('不能创建加载窗体','发生错误',MB_OK + MB_ICONSTOP);

实在感谢三位大侠!我会记得你们的!

接受