Откройте внешнюю программу в окне Inno Setup.

Question

У меня есть некоторые анимации в формате Exe, мне нужно загрузить их внутри панели в Inno Setup.

Я нашел это о Delphi:
http://www.delphipages.com/forum/archive/index.php/t-200729.html
Как перейти в другое приложение и отобразить его в форме delphi

Как реализовать такую ​​вещь в Inno Setup?

Answer 1

Эквивалентный код для Inno Setup будет выглядеть следующим образом:

[Code]

function SetParent(hWndChild: HWND; hWndNewParent: HWND): HWND;
  external 'SetParent@User32.dll stdcall';
function ShowWindow(hWnd: HWND; nCmdShow: Integer): BOOL;
  external 'ShowWindow@User32.dll stdcall';

procedure InitializeWizard();
var
  Page: TWizardPage;
  ResultCode: Integer;
  ProgHandle: HWND;
begin
  Page := CreateCustomPage(wpWelcome, 'Test', '');

  Exec('notepad.exe', '', '', SW_HIDE, ewNoWait, ResultCode);

  while ProgHandle = 0 do
    ProgHandle := FindWindowByWindowName('Untitled - Notepad');

  SetParent(ProgHandle, Page.Surface.Handle);
  ShowWindow(ProgHandle, SW_SHOWMAXIMIZED);
end;