Create Windows installer #53
Some checks reported errors
BlockStorage/repertory/pipeline/head Something is wrong with the build of this commit
Some checks reported errors
BlockStorage/repertory/pipeline/head Something is wrong with the build of this commit
This commit is contained in:
@@ -30,6 +30,15 @@ UninstallDisplayIcon={app}\{#MyAppExeName}
|
|||||||
WizardStyle=modern
|
WizardStyle=modern
|
||||||
|
|
||||||
[code]
|
[code]
|
||||||
|
const
|
||||||
|
SMTO_ABORTIFHUNG = $0002;
|
||||||
|
HWND_BROADCAST = $FFFF;
|
||||||
|
WM_SETTINGCHANGE = $001A;
|
||||||
|
|
||||||
|
function SendMessageTimeout(hWnd: HWND; Msg: UINT; wParam: WPARAM; lParam: LPARAM;
|
||||||
|
fuFlags: UINT; uTimeout: UINT; out lpdwResult: DWORD): LRESULT;
|
||||||
|
external 'SendMessageTimeoutW@user32.dll stdcall';
|
||||||
|
|
||||||
procedure RefreshEnvironment();
|
procedure RefreshEnvironment();
|
||||||
var
|
var
|
||||||
R: Cardinal;
|
R: Cardinal;
|
||||||
|
Reference in New Issue
Block a user