如何opendialog只能选择文件夹且能选择网络文件夹?(50分)

  • 主题发起人 主题发起人 hophy
  • 开始时间 开始时间
H

hophy

Unregistered / Unconfirmed
GUEST, unregistred user!
用opendialog可以访问网络,但好像只能选择文件,不能选择文件夹,而用SelectDirectory能限制只访问文件夹,但不能访问网络。
 
自己做一个SELECTDIRECTORY 用SHELLTREEVIEW可以访问网络。
 
无现成的控件或函数用吗?
 
tms套件中有一个TFolderDialog控件,选择目录
 
if SelectDirectory(Dir,[],12) then
edit2.text := Dir;
你这样用就可以了,得到的目录就可以返回到EDIT2.TEXT上了
 
var
strDirectory: String;
begin
if OpenDlg.Execute then
strDirectory := ExtractFilePath(OpenDlg.FileName);
end;
 
后退
顶部