?? poll.dpr
字號:
program poll;
uses
Forms,
// Windows,
Main in 'Main.pas' {frmLyPoll},
AdvOcr in 'AdvOcr.pas',
// HTTPtask in 'HTTPtask.pas',
// HTTPutil in 'HTTPutil.pas',
Post in 'Post.pas',
Define in 'Define.pas';
{$R *.res}
VAR
MutexHandle: THandle;
begin
// Use Mutex to only allow one copy of XXXXX to be in memory at a time
// MutexHandle := 0;
//
// TRY
// MutexHandle := CreateMutex(NIL, TRUE, 'TfrmLyPoll');
// IF GetLastError = ERROR_ALREADY_EXISTS
// THEN BEGIN
// SetForegroundWindow(FindWindow('TfrmLyPoll', NIL));
// CloseHandle (MutexHandle)
// END
// ELSE BEGIN
Application.Initialize;
Application.CreateForm(TfrmLyPoll, frmLyPoll);
Application.Run;
// END;
// FINALLY
// ReleaseMutex(MutexHandle);
// END;
end.
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -