PB的DW中如何显示其它应用程序的图标

[yinoxixi]

为了让用户可以在PB开发的系统中手工添加其它应用程序的快捷方式，因此开发了这样一个可能链接到其它应用程序的功能。
现在遇到一个问题：
在选择其它应用程序的时候，如果取得程序的图标并显示在DW中呢？
上网查了一下，似乎可以用API函数：ExtractAssociatedIcon，但苦于不会用，特请教。
或者有没有别的更好的方法也请指教，谢谢先了。

[编程夜猫]

没做过，不过思路似乎是这样。
先提取ICO（大概是用ExtractAssociatedIcon）
然后二进制写入数据库，
然后用dw中的OLE显示。

[jlwei888]

FUNCTION ulong ExtractAssociatedIcon(ulong hInst,ref string lpIconPath,ref
ulong lpiIcon) LIBRARY "shell32.dll" ALIAS FOR "ExtractAssociateIconA"


hInst Long，当前应用程序的实例句柄
lpIconPath String，指定一个文件名，准备从该文件中提取图标。如果文件并非执行程序或DLL本身，但通过系统注册表与一个可执行文件关联，就用这个字串装载可执行程序的名字
lpiIcon Long，在其中装载图标在可执行文件中的资源标识符



返回值
Long，如果找到任何图标，就返回图标的句柄；否则返回零

[AFIC]

先看看这个例子
http://www.topwizprogramming.com/freecode_displayicon.html