本文整理自网络,侵删。
program dxG10000;
uses
Forms,
main in 'main.pas' {fmMain},
splash in 'splash.pas' {fmSplash},
dxGridMenus in '../DemoUtils/dxGridMenus.pas';
{$R *.RES}
begin
fmSplash := TfmSplash.Create(nil); //欢迎窗口
try
fmSplash.Show;
fmSplash.Update;
Application.CreateForm(TfmMain, fmMain);
finally
fmSplash.Free;
fmSplash := nil;
end;
Application.Run;
end.
相关阅读 >>
pos、ansipos、fillchar在Delphi2010中unicode的问题
Delphi中组件label、edit、tag、memo、richedit
Delphi 新版 thttpclient组件同步下载文件方法
Delphi tms web core直接从html&css设计的页面布局
Delphi xe2 idhttp 获取utf-8编码中文网页
Delphi application.processmessage作用
Delphi 从 twebbrowser中获得当前输入处的链接
更多相关阅读请进入《Delphi》频道 >>