我正在使用this question中的代码在Delphi语言中创建一个闪屏。 它看起来像这样: begin
SplashForm := TSplashForm.Create(nil)
Application.Initialize;
//create your forms, initialise database connections etc here
Application.CreateForm(TForm1, Form1);
if Assigned(SplashForm) then
SplashForm.OkToClose := True;
A