delphi 软件welcome窗口代码

本文整理自网络，侵删。

 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. 

相关阅读 >>

Delphi识别android设备的电池电量

Delphi中单独编译pas生成dcu文件

Delphi2010 编译变量$region用法

Delphi idhttp登录网站教程代码

Delphi 获取internet缓存文件

floattostr 将“浮点型”转换成“字符型”

Delphi 关于选择文件路径 selectdirectory 弹出窗口居中的问题

Delphixe4 版本中，已针对移动平台 引入了 arc 模型

Delphi idhttp友好错误信息的捕获

Delphi 随意将函数执行权限提高到ring0源代码

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi 软件welcome窗口代码