H hophy Unregistered / Unconfirmed GUEST, unregistred user! 2006-08-30 #1 用opendialog可以访问网络,但好像只能选择文件,不能选择文件夹,而用SelectDirectory能限制只访问文件夹,但不能访问网络。
C cjmcn-sh Unregistered / Unconfirmed GUEST, unregistred user! 2006-08-30 #2 自己做一个SELECTDIRECTORY 用SHELLTREEVIEW可以访问网络。
Y yuzk2005 Unregistered / Unconfirmed GUEST, unregistred user! 2006-08-31 #4 tms套件中有一个TFolderDialog控件,选择目录
Q qkserver Unregistered / Unconfirmed GUEST, unregistred user! 2006-08-31 #5 if SelectDirectory(Dir,[],12) then edit2.text := Dir; 你这样用就可以了,得到的目录就可以返回到EDIT2.TEXT上了
J Johnny_du Unregistered / Unconfirmed GUEST, unregistred user! 2006-08-31 #6 var strDirectory: String; begin if OpenDlg.Execute then strDirectory := ExtractFilePath(OpenDlg.FileName); end;
var strDirectory: String; begin if OpenDlg.Execute then strDirectory := ExtractFilePath(OpenDlg.FileName); end;