Shell Control Pack问题(300分)

  • 主题发起人 主题发起人 陈冲伟
  • 开始时间 开始时间

陈冲伟

Unregistered / Unconfirmed
GUEST, unregistred user!
我在使用Shell Control Pack VCL v1.5时碰到以下问题:
1. 我将TPTShellList和TPTShellTree协同浏览目录,希望在TPTShellList下只显示
文件(其它目录和非文件系统的内容全部不显示),但是设置TPTShellList.Options
的ptsloNonFilesystemAncestors = false和ptsloHideFoldersWhenLinkedToTree = true
却没有效果,请问这是怎么回事?
2. 我希望TPTShellList能和Delphi提供的TFilterComboBox协作,实现文件的过滤功能,
可是我在TFilterComboBox.OnChange里加上一句:
PTShellList1.FileFilter := FilterComboBox1.Filter;
却没有效果.我看了TPTShellList的文挡,发现它的Filter要求格式为*.txt;*.dat;
而我的FilterComboBox1.Filter提供的过滤字符串为my files|*.txt;*.dat',是不是
因此而无法使用?如何才能解决?
3. 我希望TPTShellList显示时所有文件都排在一列中, 用垂直滑动条来实现浏览,去掉
水平滑动条,应该如何实现?
 
1、我试了可以的啊!全部是缺省值,只把 Tree 和 List 关联起来,再按你的方法设置
的。但用了 filter 之后好象要把 ptsloNonFilesystemAncestors 先设为 False再设
回 True 才行。
2、只把 FilterComboBox1.Filter 后面一部分赋给 TPTShellList 的 Filter 不行吗?
3、TPTShellList 的 ViewStyle 设为 vsSmallIcon。
 
to bbkxjy:
1、我试了可以的啊!全部是缺省值,只把 Tree 和 List 关联起来,再按你的方法设置
的。但用了 filter 之后好象要把 ptsloNonFilesystemAncestors 先设为 False再设
回 True 才行。
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^你的List中看不到目录了吗?我的还是
看得到的。

2、只把 FilterComboBox1.Filter 后面一部分赋给 TPTShellList 的 Filter 不行吗?
3、TPTShellList 的 ViewStyle 设为 vsSmallIcon。
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^不满足我的要求,因为此时还有水平
滚动条,而且文件是以多列方式显示的。

 
多人接受答案了。
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
2K
DelphiTeacher的专栏
D
后退
顶部