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实现变速齿轮

Delphi的unicode与gb2312转转换,汉字unicode转gb2312

Delphi sysutils.strcat

Delphi indy tidhttp tidhttpserver post get

Delphi xe 自己编辑xe2 vcl style(皮肤/skin)

Delphi xe strpas 遇到的问题

Delphi 10.4.1的编译器bug终于修正了!

Delphi 快速调用resource资源数据

oleinitialize和coinitialize的区别

Delphi如何判断一个combobox是否处于下拉状态

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



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...