Inno设置永远在顶部

Question

我们通常通过LANDesk运行我们的安装程序。最近我们要求始终将窗户放在最上面。我们运行的命令行是/ SP- / SILENT / SUPPRESSMSGBOXES / NORESTART /LOG="C:\LOGS\logfile.LOG“/ NOCANCEL，用于自动安装。我到处搜寻，因为我的生活找不到完成这个的方法。有没有人完成安装，对话框总是显示在顶部？

感谢。

Answer 1

您可以尝试以下内容：

[Code]
const
  HWND_TOPMOST = -1;
  SWP_NOSIZE = 1;
  SWP_NOMOVE = 2;
  SWP_SHOWWINDOW = $40;

function SetWindowPos(hWnd: HWND; hWndInsertAfter: HWND; X: Integer; Y: Integer;
  cx: Integer; cy: Integer; uFlags: UINT): BOOL;
  external 'SetWindowPos@user32.dll stdcall'; 

procedure InitializeWizard;
begin
  SetWindowPos(WizardForm.Handle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOSIZE or 
    SWP_NOMOVE or SWP_SHOWWINDOW); 
end;