Inno setup 如何中止Inno设置
我不知道为什么这不起作用-它快把我逼疯了Inno setup 如何中止Inno设置,inno-setup,Inno Setup,我不知道为什么这不起作用-它快把我逼疯了 // ---------------------------------------------------------------------------- procedure InitializeWizard(); begin { Custom wizard pages } CreateTheWizardPages; if ListBox.items.count < 1 then begin MsgBox('No Fi
// ----------------------------------------------------------------------------
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;
//----------------------------------------------------------------------------
过程初始化Wizard();
开始
{自定义向导页面}
创建向导页面;
如果ListBox.items.count<1,则开始
MsgBox('未找到文件:'#13#10#13#10+'有关帮助的访问:{#myWWW}',mbInformation,mb#u Ok);
中止
结束其他
{自定义控件}
CreateAboutButtonAndURLLabel(WizardForm、WizardForm.CancelButton);
{自定义斜面标签}
WizardForm.BeveledLabel.Caption:=“我的程序”;
结束;
msgbox会显示-但安装程序似乎不会自动退出:-(Gah)-因此,上面的代码工作正常,只需在关闭调试器的情况下运行即可 希望这对其他人有所帮助。abort语句用于退出安装程序,但仅适用于某些功能/过程
干杯,不需要在没有调试器的情况下运行脚本。只有调试器(默认情况下,它可以在IDE设置中更改)通知您引发的异常(通过调用
中止
)使用错误消息框。Btw.,考虑将您的检查移动到<代码> RealAlsieStUP 事件中,该事件节省了用于创建向导窗体的时间和资源,并提供了更为干净的机制来中止安装。(因为您不需要使用可视控件来保存文件列表;您可以使用TStringList
,在创建列表框项后,您可以将其分配给列表框项
).Hi TLama-谢谢你的提示。我会的。很抱歉,我问这个问题时,后续操作太慢了。干杯,我没有遇到de bugger设置…不知道如何将您的贡献标记为答案…不用担心;请在您的答案中包含有关调试器异常消息框的信息;)关于“暂停异常”调试器选项(默认情况下处于启用状态);我强烈建议您保持该选项处于启用状态,因为它指示引发异常的行,这是一个非常有用的工具。您只需记住,安装程序引发的所有异常都将由调试器中的消息框指示(并且,Abort
引发异常)。