大家都用過PhotoShop或Adobe Reader，它們啟動的時候先顯示的窗體就稱做快閃窗體。雖然Word等軟件也有快閃窗體，但是只要你稍微注意一下就會發現前者有動態信息提示，後者沒有。PhotoShop或Adobe Reader啟動時會在快閃窗體上不斷變換顯示信息提示，如“正在加載字體”、“正在加載畫筆”、“正在初始化”、“正在對字體進行排序”……，很多書上講了如何制作快閃窗體，但是沒有講如何實現在快閃窗體上增加信息提示，那麼如何制作呢？方法如下：
1.在你的程序中建立一個新窗體，將窗體的Name屬性設置為frm_Splash，BorderStyle屬性設置為bsNone，BorderIcons屬性設置為［］，這樣快閃窗體顯示時便沒有標題欄和邊界。
2.在frm_Splash上，添加一個Image控件，設置它的Align屬性為alClient，指定Picture屬性，載入一幅圖像。
3.可以根據需要在窗體上添加別的說明信息，如：設計人、開發商等。用Label控件，一定要把Transparent屬性設置為True，這樣才是透明的，否則影響背景顯示。
4.同樣用Label控件，把Name屬性設置為lbl_Text，同樣也把Transparent屬性設置為True，道理一樣。
在Project1.dpr中添加如下代碼：
begin
Application.Initialize;
frm_Splash:=Tfrm_Splash.Create(Application); //創建快閃窗體
frm_Splash.Show; //顯示快閃窗體
frm_Splash.Update; //強制更新快閃窗體
Application.CreateForm(TfrmMain, frmMain);
frm_Splash.lbl_Text.Caption:='創建主窗體'; //快閃窗體提示信息
frm_Splash.Update; //強制更新快閃窗體
……
Application.CreateForm(Tfrm_MemberInfo, frm_MemberInfo);
frm_Splash.lbl_Text.Caption:='加載會員信息窗體'; //快閃窗體提示信息
frm_Splash.Update; //強制更新快閃窗體
Application.CreateForm(Tfrm_MemberTimeOut, frm_MemberTimeOut);
frm_Splash.lbl_Text.Caption:=加載過期會員窗體'; //快閃窗體提示信息
frm_Splash.Update; //強制更新快閃窗體
frm_Splash.Hide; //隱藏快閃窗體
frm_Splash.Free; //釋放快閃窗體所占資源
Application.Run;
end.
運行效果如下圖所示。
