Inno Setup的BrowseForFolder對話框，地址欄

Question

當我使用的Inno Setup中BrowseForFolder功能我得到這樣

一個對話框，是否有可能得到一個地址欄對話框，如這一個？

Answer 1

使用TInputDirWizardPage（CreateInputDirPage），而不是使用BrowseForFolder功能。

該頁面有你想要的瀏覽對話框（實際上我假設你的第二個屏幕截圖顯示了這個對話框）。

---

如果您不想添加新頁面，只需創建一個假的並濫用它即可。

var 
    FakePage: TInputDirWizardPage; 

procedure BrowseForFolderEx(var Directory: String); 
begin 
    FakePage.Values[0] := Directory; 
    FakePage.Buttons[0].OnClick(FakePage.Buttons[0]); 
    Directory := FakePage.Values[0]; 
end; 

procedure InitializeWizard(); 
begin 
    FakePage := 
    CreateInputDirPage(wpWelcome, '', '', '', False, SetupMessage(msgButtonNewFolder)); 
    FakePage.Add(''); 
end; 

function ShouldSkipPage(PageID: Integer): Boolean; 
begin 
    Result := (PageID = FakePage.ID); 
end;