闪屏制作技巧 wxh zt

wxhwhmanshan

                  简介制作系统闪屏的方法很多，现我说说一种简单，美观的制作方法供参考。
                  首先：新建一个工程
                  eg:program Flash_project;
                  然后：新建一个form改名字为：FlashFm,在delphi主菜单中选择projet项，在projet项中选择options,在弹出的对话框中把FlashFm从Autocreate移到Availableform

                  第三：按键盘上F7键进入工程文件。
                  在工程文件中添代码如下：
                  begin
                  Application.Initialize;
                  Flashfm:=TFlashfm.create(application);//创建一个闪屏窗体。
                  Flashfm.showmodal;//显示窗体

                  FlashFm.update ;//更新窗体
                  Application.CreateForm(Tmainfm, mainfm);//系统主窗体
                  Flashfm.free;//释放窗体资源
                  Application.Run;
                  end.
                  注意：不能随意更改系统代码。
                  最后：在FlashFm窗体中加入一个Timer组键。用来控制窗体显示时间。然后调用close关闭闪屏.