2014-09-28 267 views
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顯示 - 但安裝程序似乎並不默默退出:-(

回答

1

爾加 - 因此,原來上面的代碼完美地工作,只需要運行與調試器關閉

希望這有助於有人在那裏將中止語句用來退出安裝程序,但只適用。某些功能/程序。

歡呼聲,

+0

沒有調試器就不需要運行腳本。只需調試器(默認情況下,它可以在IDE設置中更改)通過錯誤消息框通知您引發的異常(通過調用「Abort」)。順便說一下,考慮將你的支票移動到'InitializeSetup'事件中,該事件節省了用於創建嚮導表單的時間和資源,並提供更清晰的機制來中止設置(因爲你不需要使用可視控件來保存列表的文件;你可以使用'TStringList',你可以在'Items'創建後將'Assign'賦值給你的列表框]。 – TLama 2014-09-28 12:55:55

+1

嗨TLama - 感謝您的提示。會做。對於慢速後續感到抱歉,當我問這個問題時,是操作系統。歡呼 – SlowLearner 2014-10-20 22:13:29

+0

順便說一句,我還沒有遇到過除蟲設置...不知道如何標記你的貢獻作爲答案... – SlowLearner 2014-10-20 22:22:26