怎么实现WINDOWS的打开文件框中的选择目录的哪个下拉框(20分)

  • 主题发起人 主题发起人 星期一
  • 开始时间 开始时间
to 太阳火:D5中怎么实现?
to jianxiancheng:有例子吗?
 
D6太不稳定了:(没错!就是shellcombobox的效果!D5中怎么实现?
 
http://vcl.vclxx.org/DELPHI/D32FREE/PATHCOMBO.ZIP
TPathComboBox 是类似 Windows95 开启文件/储存文件中选取文件目录所在位置的改良
版 TComboBox 构件 ( 2.0 版,附源码),作者:Angus Johnson

http://vcl.vclxx.org/DELPHI/D32FREE/FILEEXPL.ZIP
TLsDirComboBox 及 TLsFileListView 是类似资源管理器 ( File Explorer ) 式样的
加强版 TComboBox 构件及 TListView 构件 ( 2.870 版,附源码 ),作者 : Leo D. Shih。


 
楼上的,PATH哪个空间有错,不能INSTALL,PATH那个空间很接近我要的了,可是没源码:(哪有源码?
 
procedure TForm1.Button1Click(Sender: TObject);
var
a: BROWSEINFOA;
begin
a.hwndOwner := Handle;
a.pidlRoot := 0;
a.pszDisplayName := nil;
a.lpszTitle := '我的文件夹选择';
a.ulFlags := 0;
a.lpfn := nil;
a.lParam := 0;
a.iImage := 0;
SHBrowseForFolder(a);
end;
 
http://vcl.vclxx.org/DELPHI/D32FREE/FILEEXPL.ZIP
这个绝对让你满意.跟WINDOWS的打开文件框中的选择目录的哪个下拉框以一样。
 
楼上的:是很接近了,可是不能显示网络邻居,还有,没有源代码!
 
试试这个:
var
sPath: string;
begin
if SelectDirectory('请选择存放“分析家”数据的临时路径', '', sPath) then
edFXJPath.Text := sPath;
end;
 
楼上的,我要的是combbox那种的
 
[blue][/blue]全是废话!没有 一个敢说自己是老大的,你们为什么不去看看我的问题,我问了一年了!没有
人回答真让我感觉到这里的技术是不是已经过时了,或者是这是这里的人已经不
是做编程的!
http://www.delphibbs.com/delphibbs/dispq.asp?lid=719446
http://www.delphibbs.com/delphibbs/dispq.asp?lid=666070
http://www.delphibbs.com/delphibbs/dispq.asp?lid=716037
http://www.delphibbs.com/delphibbs/dispq.asp?lid=730641
http://www.delphibbs.com/delphibbs/dispq.asp?lid=655233
如果能有人回答这些问题才是真的高手呀!
 
楼上的问题看了,真是厉害!可为什么就不帮帮我呢~~~~~~~~~~~~~~~~
 
真是的,如果要象“地址”那里的COMBOBOX的话,DELPHI6带着有的。
6 还同时带有shelltree和shelllist,好使。
弹出一个对话框的可以用:selectdirectory()函数。
 
我用的是D5,所以要D5下的解决方法。

请各位注意楼上各位的发言和我的注释。
 
怎么加分????
 
我也想知道!
 
后退
顶部