当用户单击完成按钮时,将打开一个网页以及软件exe。但问题是网页将始终保持在顶部。
在
Run
部分:
Filename: "{app}\abc.exe"; Description: {cm:LaunchProgram,ABC}; \
Flags: nowait postinstall skipifsilent shellexec runasoriginaluser runmaximized; \
WorkingDir: {app}
要求是exe需要在最上面。
我打开网页所遵循的代码:
const insSiteURLEN = 'https://example.com';
procedure CurStepChanged(CurStep: TSetupStep);
var ErrorCode: Integer;
begin
if CurStep=ssDone then
begin
ShellExec('', insSiteURLEN, '', '', SW_SHOW, ewNoWait, ErrorCode);
end;
end;
恐怕很难实现。您正在并行启动两个应用程序。第一个成功打开窗口的窗口将被需要更长时间打开的窗口所掩盖。
您在应用程序之后打开网页绝对不会帮助它 – 运行CurStepChanged(ssDone)
postinstall
条目后会触发
Run
。将网页打开码移至
NextButtonClick(wpFinished)
。
即使这样也不能保证应用程序在浏览器顶部打开。它只会让它更有可能。顺便说一句,如果你通过
Run
打开网页,实现起来会更容易。这甚至可以让用户决定是否要打开网页。