?? delay.via
字號:
// Delay.lnl
application PE GUI;
include "win32a.inc";
MSG msg;
frame DoEvents();
if(PeekMessage(@msg, NULL, 0, 0, FALSE)=TRUE) {
TranslateMessage(msg);
DispatchMessage(msg);
}
end;
frame Delay(dword MS);
dword Wait;
Wait = GetTickCount() + MS;
while (GetTickCount() < Wait) { DoEvents(); }
end;
entry
MessageBox(0,"Start..","Delay..",$20);
Delay(2000);
MessageBox(0,"..End!","Delay..",$20);
end.
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -