如何中止Inno设置

Question

我不知道为什么这不起作用 - 它让我疯了......

// ----------------------------------------------------------------------------
procedure InitializeWizard();

begin
  { Custom wizard pages }
  CreateTheWizardPages;

  if ListBox.items.count < 1 then begin 
    MsgBox('No File Found:'#13#10#13#10 + 'For help visit: {#myWWW}', mbInformation, mb_Ok);
    Abort;
  end else

  { Custom controls }
  CreateAboutButtonAndURLLabel(WizardForm, WizardForm.CancelButton);

  { Custom beveled label }
  WizardForm.BeveledLabel.Caption := ' My Program ';

end;

msgbox显示 - 但安装程序似乎没有静默退出： - （

Answer 1

Gah - 所以事实证明上面的代码运行完美，只需在关闭调试器的情况下运行它。

希望这有助于那里的人。 abort语句用于退出安装程序，但仅适用于某些功能/过程。

干杯，