关于文件定位(28分)

  • 主题发起人 主题发起人 唐佐平
  • 开始时间 开始时间

唐佐平

Unregistered / Unconfirmed
GUEST, unregistred user!
我想在Delphi中实现文件定位功能:
已知文件名和文件所在目录,我想打开这个文件夹,并且选中该文件名,
效果和在windows中鼠标右击快捷方式,属性电话框中的查找目标。
 
自己做一个文件管理器界面,列出目录及文件列表,这时文件名与目录名你都知道的了,这时就比较好处理了。
 
Winexec(pChar('文件所在目录'),SW_SHOW)
 
weiliu:你的方法太复杂了,得不偿失;
zbr:你的方法只完成了一半,关键部分是要定位文件,即打开文件夹后选中某个文件;
 
呵呵,拿分了,前两天刚搞的
Procedure OrientationFile(FilePath:String);
var
Cmd:string;
begin
CMD:='explorer /select,'+FilePath;
WinExec(PChar(CMD),SW_ShowNormal);
end;
 
谢谢mysirius,真是会者不难[:D]
 
接受答案了.
 
后退
顶部