DirectoryListBox1怎么显示系统、隐藏文件? 急!答对有高分啊……谢谢(0分)

  • 主题发起人 主题发起人 singer
  • 开始时间 开始时间
S

singer

Unregistered / Unconfirmed
GUEST, unregistred user!
DirectoryListBox1怎么显示系统、隐藏文件? 急!答对有高分啊……谢谢 DirectoryListBox1怎么显示系统、隐藏文件? 急!答对有高分啊……谢谢 DirectoryListBox1怎么显示系统、隐藏文件? 急!答对有高分啊……谢谢 DirectoryListBox1怎么显示系统、隐藏文件? 急!答对有高分啊……谢谢 DirectoryListBox1怎么显示系统、隐藏文件? 急!答对有高分啊……谢谢
 
可以试试用filelistbox代替,filetype属性设为[ftHidden,ftDirectory]。
或者修改filectrl.pas中directorylistbox的源代码:
在function TDirectoryListbox.ReadDirectoryNames中
有一句
Status := FindFirst(SlashSep(ParentDirectory, '*.*'), faDirectory, SearchRec);
将其改成
Status := FindFirst(SlashSep(ParentDirectory, '*.*'), faDirectory+fahidden, SearchRec);
即可
 
拜托老兄
不要把那些没有用的帖子转来转去的
那样做没有用的……
还需要设置一些什么东西,但我不知道……
 
后退
顶部