初学者有一问题

Question

delphi可以像VB那样设定启动窗体吗？
如可以，请问如何设置！

Answer 1

project－>
options从里面就能设
也可从工程文件里设

Answer 2

你是说的启动时的
Splan窗体吗

Answer 3

可以
在工程文件里可以这样写Application.Initialize;
SplashForm:=TSplashForm.Create(Applicaiton);
SplashForm.Show;
SplashForm.Update;
sleep(1000);
//这里写其他窗体创建或事件
Splash.Hide;
Splash.Free;

Answer 4

1、project--->option--->mainform
2、application.mainform:=XXXX;
3、工程文件里第一个这么调用就是主窗口
Application.CreateForm(TForm1, Form1);

Answer 5

启动窗口啊，不是主窗口，明白了...-_-!!
var StartForm:TForm1;
begin
  StartForm:=TForm1.Create(nil);
  StartForm.Show;
  StartForm.Update;
  Application.Initialize;
  Application.Title := '接入网设备监控程序';
  Application.CreateForm(TfrmMain, frmMain);
  Application.CreateForm(TfrmComm, frmComm);
  Application.CreateForm(TfrmAPAlarm, frmAPAlarm);
  Application.CreateForm(TfrmTCAlarm, frmTCAlarm);
  Application.CreateForm(Tfrm4EAlarm, frm4EAlarm);
  Application.CreateForm(TfrmAPParam, frmAPParam);
  Application.CreateForm(TfrmTCParam, frmTCParam);
  Application.CreateForm(Tfrm4EParam, frm4EParam);
  Application.CreateForm(TFrmCopyRight, FrmCopyRight);
  StartForm.Close;
  Application.Run;
end.