以下の内容はhttps://blog.systemjp.net/entry/2024/01/09/143103より取得しました。


inno setupでインストール時に選択肢を出す

MsgBox()が使える
CurStep = ssInstallはインストールプロセスが開始された時。
実際のファイルコピーが開始される前にカスタムアクションを実行することができます。

[Code]
var
  ShouldCreateRestorePoint: Boolean;

function InitializeSetup(): Boolean;
begin
  // ユーザーに復元ポイントの作成を尋ねる
  ShouldCreateRestorePoint := (MsgBox('復元ポイントを作成しますか?', mbConfirmation, MB_YESNO) = IDYES);

  Result := True;
end;

procedure CurStepChanged(CurStep: TSetupStep);
begin
  // インストール開始時に復元ポイントを作成する
  if (CurStep = ssInstall) and ShouldCreateRestorePoint then
  begin
    Exec('powershell.exe', '-ExecutionPolicy RemoteSigned -File "{app}\checkpoint.ps1" runas', '', SW_HIDE, ewWaitUntilTerminated, 0);
  end;
end;



以上の内容はhttps://blog.systemjp.net/entry/2024/01/09/143103より取得しました。
このページはhttp://font.textar.tv/のウェブフォントを使用してます

不具合報告/要望等はこちらへお願いします。
モバイルやる夫Viewer Ver0.14