Cách phổ biến nhất để tạo hộp thoại chọn thư mục bằng Delphi là gì?

Question

Có vẻ như không phải là một thành phần đơn giản có sẵn để tạo hộp thoại chọn thư mục trong Delphi 2009, mặc dù hộp thoại chọn tệp được cung cấp theo cách của TOpenDialog.

Cách phổ biến nhất để tạo hộp thoại chọn thư mục hiện đại bằng Delphi là gì?

Answer 1

Có hai thói quen quá tải trong FileCtrl.pas gọi SelectDirectory

Đối với một cái nhìn hiện đại, sử dụng các hình thức thứ hai, với sdNewUI

var 
    dir : string; 
begin 
    dir := 'C:\temp'; 
    FileCtrl.SelectDirectory('Select', 'C:\', dir, [sdNewFolder, sdNewUI], Self); 
end; 

LƯU Ý: sdNewFolder, sdNewUI vv chỉ có sẵn từ D2006 +

Answer 2

bạn có thể sử dụng SelectDirectory từ đơn vị FileCtrl

using FileCtrl; 
var 
    St: string; 
begin 
    St:='c:\'; 
    if SelectDirectory(St,[],0) then 
    begin 
    end; 

end; 

Answer 3

Xem mã mẫu:

---

Delphi tip # 157: chọn hộp thoại thư mục http://www.scalabium.com/faq/dct0157.htm

---

Answer 4

Bạn có thể tải về một phần PBFolderDialog từ "http://bak-o-soft.dk/Delphi/PBFolderDialog.aspx", đó là khá dễ sử dụng và cung cấp truy cập cho tất cả các tùy chọn của hộp thoại "SHBrowseForFolder" của Windows; một cái gì đó mà những người tích hợp không làm.

Đó là phần mềm miễn phí với nguồn và không quá khó để chuyển đến Delphi 2009.