关于代码的问题!!!!!(5分)

  • 主题发起人 主题发起人 itkill
  • 开始时间 开始时间
I

itkill

Unregistered / Unconfirmed
GUEST, unregistred user!
procedure TFrmMain.FormCreate(Sender: TObject);
begin
FList:=TList.Create;
CriticalSection:= TCriticalSection.Create;
end;

要怎么在上面加入Application.CreateForm(TSplashForm,SplashForm);
SplashForm.Show;
SplashForm.Update;
Application.Initialize;
SplashForm.Close;
Application.Run;
这些呀??这是提示屏的代码!
 
放在 Application.Initialize;
和 Application.Run;
两行之间

Application.Initialize;
Application.CreateForm(TSplashForm,SplashForm);
SplashForm.Show;
SplashForm.Update;
SplashForm.Close;
Application.Run;
 
哪这个不要了吗???procedure TFrmMain.FormCreate(Sender: TObject);
begin
FList:=TList.Create;
CriticalSection:= TCriticalSection.Create;
end;
 
在Application.CreateForm(TSplashForm,SplashForm);之后写
Application.CreateForm(TFrmMain,FrmMain);
触发create事件
 
procedure TFrmMain.FormCreate(Sender: TObject);
begin
end;
要怎么在上面加很多代码!比如放ICON的代码呀提示屏的代码呀等???
 
后退
顶部