获得SysListView32的句柄，如何获得路径？

2011-03-21 07:27:30 263 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

fisher_older 墨衍会员 · AI 创作全网分发关注 + 加入社区

例如文件在D:\VC\MyProject\try.cpp, 当选中文件try.cpp时，能够得到SysListView32的句柄。那么如何得到文件夹的路径呢？即得到“D:\MyFolder\MyProject”。只要得到文件夹路径就行了。

...全文

fisher_older

Windows SDK/API 1,184 成员 22,326 内容

+ 关注 + 加入社区

切换为时间正序

dinoalex 2011-03-28

打赏
举报

[code=Delphi(Pascal)]
var ThePathEditHandle: THandle; // 全局

function _EnumEditWndProc(AhWnd: LongInt; AlParam: LParam): boolean; stdcall;
var
WndClassName: array[0..511] of Char;
begin
GetClassName(AhWnd, WndClassName, 512);
if string(WndClassName) = 'Edit' then ThePathEditHandle:= AhWnd;
result:= true;
end;

// 调用

var
h,h2: THandle;
Buf: array[0..255] of char;
begin
// ............ 你的其它代码, 如找句柄..
GetClassName(h, szClass, 255); // h 枚举句柄
if String(szClass) = 'SysListView32' then // 找到 SysListView32
begin
h2:= GetForegroundWindow();
EnumChildWindows(h2, @_EnumEditWndProc, 0);
sendmessage(ThePathEditHandle, WM_GETTEXT, 255, integer(@buf));
memo1.Lines.Add(string(buf));
end;
end;
[/Code]

dinoalex 2011-03-28

打赏
举报

需要写上找SysListView32的代码吗? 最好不要, 或者你留个邮箱吧.

fisher_older 2011-03-28

打赏
举报

加了个判断标志，现在可以了。多谢了。结贴。

fisher_older 2011-03-28

打赏
举报

谢谢dinoalex，你的方法很好，我已经能够提取路径了。只是桌面不能适用，因为桌面没有edit，呵呵。

fisher_older 2011-03-27

打赏
举报

好的，谢谢，我很需要。

dinoalex 2011-03-26

打赏
举报

你确定你能找到SysListView32的句柄??

因为我这边也有找SysListView32的, 免得跟你的搞乱.

如果你确定的话,我就整理一下代码给你.

fisher_older 2011-03-25

打赏
举报

网上有人说可以通过shell编程的方法实现，有高手知道怎么做吗？多谢了！头发都急白了。

fisher_older 2011-03-25

打赏
举报

[Quote=引用 10 楼 dinoalex 的回复:]
你能找到syslistview32句柄,那么你应该能找到Edit的句柄,如果你找到EDIT就好办了
[/Quote]
能否请教该怎么做？另外如果是桌面怎么办？

dinoalex 2011-03-25

打赏
举报

你能找到syslistview32句柄,那么你应该能找到Edit的句柄,如果你找到EDIT就好办了

fisher_older 2011-03-24

打赏
举报

高手快出现啊。

浩南_哥 2011-03-24

打赏
举报

。。。。。。人家那个不是有解决办法了嘛

fisher_older 2011-03-24

打赏
举报

用Hook来得到explorer中文件夹中的路径，那个方法没成功。

fisher_older 2011-03-24

打赏
举报

哪个？没有啊？

fisher_older 2011-03-24

打赏
举报

问题同http://topic.csdn.net/t/20061013/16/5080675.html
请高手帮忙。

fisher_older 2011-03-23

打赏
举报

点击文件发现，是由explorer.exe打开的，那么如何根据explorer.exe得到文件的路径呢？

iamduo 2011-03-21

打赏
举报

关注回复内容回复太快，请先休息一下！

Oraclers 2011-03-21

打赏
举报

var
FilePath:string;
begin
FilePath:=ExtractFilePath('try.cpp');
end;

fisher_older 2011-03-21

打赏
举报

可能是我没说清楚。先打开我的程序，然后鼠标点击任意文件，然后在我的程序中响应，我的程序memo中输出路径。