program splashdemo;
uses
forms,
windows,
controls,
messages,
main in 'main.pas',
splash in 'splash.pas' ;//這個窗體是最先彈出的窗體
varhmutex: thandle;
foundwnd: thandle;
modulename: string;
function enumwndproc(hwnd: thandle; param: cardinal): bool; stdcall;
//列表並且得到最初的第乙個視窗例項的控制代碼，賦值給foundwnd
varclassname, winmodulename: string;
wininstance: thandle;
begin
result := true;
setlength(classname, 100);
getclassname (hwnd, pchar (classname), length (classname));
classname := pchar(classname);
if classname = tfrmmain.classname then
begin
setlength(winmodulename, 200);
wininstance := getwindowlong(hwnd, gwl_hinstance);
getmodulefilename (wininstance, pchar (winmodulename),
length(winmodulename));
winmodulename := pchar(winmodulename); // 調整長度
if winmodulename = modulename then
begin
foundwnd := hwnd;
result := false; // 如果已找到，停止繼續列舉
end;
end;
end;
frmsplash := tfrmsplash.create(nil);
trywith frmsplash do
begin
beginload;
//loadsomedata1;
updateloadstatus('正在載入資料1', 20);
//loadsomedata2;
updateloadstatus('載入其他資料2', 40);
//loadsomedata3;
updateloadstatus('開始裝載資料3', 60);
//loadsomedata4;
updateloadstatus('開始裝載資料4', 70);
//loadsomedata5;
updateloadstatus('開始裝載資料5', 80);
//loadsomedata6;
updateloadstatus('開始裝載資料6', 90);
睡眠畫面載入
針對應用windows ce系統的掌上裝置，在系統進入睡眠狀態前載入並顯示睡眠畫面。通過讀取登錄檔查詢所要載入的bmp格式，並讀取資訊。對於橫屏裝置，水平放置 對於豎屏裝置，逆時針旋轉90度放置。首先讀取登錄檔資訊 sleeppicerror regopenkeyex hkey local mach...
子畫面呼叫父畫面的js方法
這裡有兩種 1 是iframe的形式 就是在乙個畫面下，有多個iframe，形式就是我們日常用的郵箱的形式，在乙個畫面中可以開啟多個tab頁面。此時呼叫父畫面的方法用window.parent var openerwindow window.parent openerwindow.getdataby...
定製開機畫面
不掛載分割槽不能複製 在用unmount指令解除掛載分割槽 使用方法 mount 選項 t 型別 o 掛載選項 裝置 掛載點 umount 掛載點 裝置 以讀寫模式掛載 system 刪除舊的su檔案 複製舊的su檔案 修改su檔案的許可權 解除安裝 system指令碼檔案 如下 ui print ...