窗口的显示？

Question

在主窗口open的时候先打开一个没有边框，没有标题的窗口，里面放上一张图片，可不可以呵呵，我不是做DELPHI的，不过顺便路过，说上两句。^_^

Answer 1

...
application.create(Tform2,form2);
form2.show;
application.create(Tform1,form1);
application.run;应该是这样的，你看看project的源文件对照一下

Answer 2

在主窗体装载时，将其hide,show一张图片，装载完后，Unload 图片，Show 主窗体

Answer 3

在工程原码中
begin
MoveForm:=TMoveForm.Create(Application);{Create创建闪现窗口对象}
MoveForm.Show;
MoveForm.Update;
Application.CreateForm(TMainForm,MainForm);
MoveForm.Hide;
MoveForm.Free;{Free从内存中释放对象}
Application.Run;
end.
　　

Answer 4

我只知道VB中如何写
Sub Main()
'启动画面
On Error Resume Next
If App.PrevInstance = False Then
Dim frm1 As New FlashShell  '启动画面
Dim frm2 As New DiskForm    '主窗体
frm1.Show
DoEvents           '因为frm2的启动中有几个非常占时间和机器的过程
frm2.Show
Unload frm1
Else
MsgBox ("光盘管理之星已经运行:-)")
End If
End Subdelphi中估计该这么写 Application.Initialize;
 Application.CreateForm(TFormSplash,Form1);
 Application.CreateForm(TForm1, Form2);
 Form1.Close;
 Application.Run;