1
我不知道爲什麼,這是行不通的 - 它的駕駛我堅果...如何中止Inno Setup的
// ----------------------------------------------------------------------------
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顯示 - 但安裝程序似乎並不默默退出:-(
沒有調試器就不需要運行腳本。只需調試器(默認情況下,它可以在IDE設置中更改)通過錯誤消息框通知您引發的異常(通過調用「Abort」)。順便說一下,考慮將你的支票移動到'InitializeSetup'事件中,該事件節省了用於創建嚮導表單的時間和資源,並提供更清晰的機制來中止設置(因爲你不需要使用可視控件來保存列表的文件;你可以使用'TStringList',你可以在'Items'創建後將'Assign'賦值給你的列表框]。 – TLama 2014-09-28 12:55:55
嗨TLama - 感謝您的提示。會做。對於慢速後續感到抱歉,當我問這個問題時,是操作系統。歡呼 – SlowLearner 2014-10-20 22:13:29
順便說一句,我還沒有遇到過除蟲設置...不知道如何標記你的貢獻作爲答案... – SlowLearner 2014-10-20 22:22:26