delphi 遍历桌面上图标,并且获得文字(图标标题)以及坐标

对于应用程序图标都保存在

C:\Documents and Settings\%当前用户名%\桌面
C:\Documents and Settings\All Users\桌面

两个文件夹内，以快捷方式文件的形式存在，用遍历文件的方式就可以遍历这些图标。

对于系统图标，如：“我的文档”、“我的电脑”等，这些图标保存在注册表中。

是否显示这些图标在注册表：

HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer

下，如有一个键NoNetHood值为1，表示不显示“网络邻居”。

每个系统图标都有一个GUID，例如“网络邻居”的GUID为{208D2C60-3AEA-1069-A2D7-08002B30309D}，那么在注册表：

HKEY_CLASSES_ROOT\CLSID\{208D2C60-3AEA-1069-A2D7-08002B30309D}

下，有“网络邻居”的名称，提示，显示图标。

遍历桌面图标可以遍历图标文件夹里的所有图标文件并获取文件名，这个简单啊，但是如果要获取图标所在屏幕上的坐标，这个就不是那么容易了！至少delphi来说目前没有这种类似的开源代码。

易语言可以实现屏幕找文字所在的坐标，结合你所遍历得到的图标文件的文件名可以找到坐标，但是你也得做字库啊，你又不晓得桌面会有什么名字的图标，你怎么做字库？对吧？字库太大找起来也没那么快。

如果非要用delphi实现屏幕找指定名字图标的坐标你问1000个人里面可能会有1个人知道，也可能谁都不知道。