一个刚学dephi的问题，在主窗体运行显示之前先显示图片

Question

在主窗体显示之前先显示一幅图

Answer 1

新建个bsNone的Form，放个alClient的Image在上面。再放个Timer，设置Interval显示时间。
设置事件  Timer1.Enabled := False;
Ctrl＋F12显示Project.dpr文件。修改begin end间的内容。  Application.Initialize;
  Form2 := TForm2.Create(Application);
  Form2.Show;
  Form2.Update;
  while Form2.Timer1.Enabled do
    Application.ProcessMessages;
  Application.CreateForm(TForm1, Form1);
  Form2.Hide;
  Form2.Free;
  Application.Run;

Answer 2

file->new->others->forms->aboutbox建立模版谢谢zousoft(好心肠的肉干) ( ) 这么详细解释~~~