托盘菜单带图标例程(非原创)

永强 · 发表于 2012-11-18 21:28:56

.版本 2

.子程序 get_Handle, 整数型
.参数 IPicture, 整数型
.局部变量 arg, 整数型, , "2"
.局部变量 pHandle, 整数型

arg [1] ＝ IPicture
arg [2] ＝ _P_INT32 (pHandle, 0)
返回 (选择 (动态调用子程序 (_ToDword (_ToDword (IPicture) ＋ 3 × 4), arg, 假) ＝ 0, pHandle, 0))

.子程序 _ToDword, 整数型
.参数 Point, 整数型
.局部变量 ret, 整数型

RtlMoveMemory (ret, Point, 4)
返回 (ret)

.子程序动态调用子程序, 整数型
.参数子程序地址, 整数型
.参数参数, 整数型, 数组
.参数是否为C调用方式, 逻辑型, 可空

返回 (CallWindowProc ({ 85, 139, 236, 86, 139, 117, 16, 141, 78, 255, 133, 201, 124, 21, 139, 69, 12, 141, 4, 136, 65, 139, 16, 137, 85, 16, 255, 117, 16, 131, 232, 4, 73, 117, 242, 255, 85, 8, 137, 69, 12, 139, 69, 20, 133, 192, 116, 13, 141, 4, 181, 0, 0, 0, 0, 137, 69, 16, 3, 101, 16, 139, 69, 12, 94, 93, 194, 16, 0 }, 子程序地址, 参数, 取数组成员数 (参数), 是否为C调用方式))

.子程序 __启动窗口_将被销毁

78971368 · 发表于 2012-11-18 23:27:17

这个的确挺不错

十梦九她 · 发表于 2012-11-19 01:09:40

谢谢分享了

◥◣糖菓屋◢◤ · 发表于 2013-1-29 08:12:45

http://urlxf.qq.com/?EZzQfmm

koso · 发表于 2013-1-29 08:33:46

嗯嗯。不错。继续努力

本文章来自：精易论坛(http://bbs.125.la/thread-25566-1-1.html）请保留此链接, 感谢!

Sth · 发表于 2013-1-29 10:34:40

感谢楼主的开源

Sth · 发表于 2013-1-29 10:35:37

好无聊。。。。

◆◆筱杰 · 发表于 2013-1-29 10:37:17

看一看家啊！

mysany · 发表于 2013-2-16 00:03:33

支持谢谢了

ww970097126 · 发表于 2013-3-2 21:50:54

看看咯！！！！！！！

		自动登录	找回密码
密码			注册

[易语言软件开源] 托盘菜单带图标例程(非原创)