如何做到查找目标文件并选中？

Question

  我需要实现一个功能，就好像快捷方式属性里那个查找目标按钮那样  如果直接用    ShellExecute(0,'explor',file,nil,nil,0)  这样，根本没有反应。  我不是太了解，但我知道每个窗口其实是个 listview，如果直接打开该文件的目录，然后读Count，怎么会是0？    hwd:=ShellExecute(self.Handle,'open','explorer.exe',pchar(filedir), nil,SW_NORMAL);  
  ListView_GetItemCount(hwd)  其实是不是根本不用那么复杂，explorer.exe 是不是应该加什么参数就可以实现这样的功能呢？  

Answer 1

通过文件查找实现findfile什么的

Answer 2

to wanderung(扬清) 没必要吧，我已经知道那个是什么文件，在什么地方，我只是想打开一个窗口，选中那个文件而已

Answer 3

其实我的意思就是 我已经知道比如 c:\windows\1.txt 这样的一个文件，我想打开一个文件浏览窗口，这个窗口打开 c:\windows ，并选中 1.txt 文件就这样，难道都没人知道吗？

Answer 4

呵呵，完成这个功能，可以换一个思路，用一个TOpenDialogr控件就可以了（在Dialog页面下）。想打开浏览就可以这样：
procedure TForm1.Button1Click(Sender:TObject);
begin
  if OpenDialog1.Execute then
  begin
    //干你的事，如：ShowMessage(OpenDialog1.FileName);
  end;
end;

Answer 5

faint，没必要吧，我还不如直接 ShowMessage(FileName)我说了，这个 FileName 已经知道完整路径了，我现在只是想打开一个 浏览文件的窗口，这个窗口的目录是该文件的目录，并选中那个文件就好像开始菜单里快捷方式的属性，有一个查找目标的按钮，一点就可以显示那个快捷方式的原文件的位置

Answer 6

anggogo(angGoGo) ，俺真同情你，他们这么回答问题也太扯了。打开用你上面这个api   
hwd:=ShellExecute(self.Handle,'open','explorer.exe',pchar(filedir), nil,SW_NORMAL);  
就行了，可选中俺也不知道，大家一起找吧。