自定义的TShockwaveflash.ocx
添加功能:对鼠标在 flash.ocx 中的信息捕获.
可捕获鼠标信息有:
1.鼠标在控件中移动时的坐标值;
2.鼠标右击时弹出菜单的设置;
3.鼠标点击控件时移动窗体;
4.鼠标是否移入控件;
---------------------------------------------------
下载连接:http://ending722.efile.com.cn / 中的:customflash.ocx.rar.
---------------------------------------------------
编写原因:
我一直在作一个flash播放器:D-Flasher.
所以,要在其中捕获鼠标的一些消息.
但原 TShockwaveFlash 组件没有这些方法.
只能通过:Application.OnMessage:=Form.Msgproc;
这样的并不高级的办法.所以作了这么一个东西.
对 TShockwaveFlash 组件作了自定义.
在原来控件上加了对鼠标的行为的监控.
使得对 Flash 控件的鼠标消息处理的效率提高了.
用起来也方便了不少.
所以共享出来.若存在什么错误,还请指正.
由于本人水平有限,也是处于学习中.
也有许多不完善的地方,欢迎大家进行修改.
添加功能:对鼠标在 flash.ocx 中的信息捕获.
可捕获鼠标信息有:
1.鼠标在控件中移动时的坐标值;
2.鼠标右击时弹出菜单的设置;
3.鼠标点击控件时移动窗体;
4.鼠标是否移入控件;
---------------------------------------------------
下载连接:http://ending722.efile.com.cn / 中的:customflash.ocx.rar.
---------------------------------------------------
编写原因:
我一直在作一个flash播放器:D-Flasher.
所以,要在其中捕获鼠标的一些消息.
但原 TShockwaveFlash 组件没有这些方法.
只能通过:Application.OnMessage:=Form.Msgproc;
这样的并不高级的办法.所以作了这么一个东西.
对 TShockwaveFlash 组件作了自定义.
在原来控件上加了对鼠标的行为的监控.
使得对 Flash 控件的鼠标消息处理的效率提高了.
用起来也方便了不少.
所以共享出来.若存在什么错误,还请指正.
由于本人水平有限,也是处于学习中.
也有许多不完善的地方,欢迎大家进行修改.
解决方案 »
- 软件运行一段时间提示 Thread Creation error:配额不足,无法处理此命令
- DELPHI 20111111大礼包
- 关于Delphi三层开发
- dxDBTreeView控件(DevExpress DBTree Suite控件)如何判断滚动事件
- Delphi5中使用ServerSocket传送数据,为什么内存会不断的增加?请问如何解决?
- 请问怎样实现在两个form之间传值
- 在线等待.怎么才能把数据库加密啊!
- 在线帮忙!!!!分5000
- 有两台计算机,怎样在客户机上取得服务器上sqlserver的数据???
- :Quick Report中寫sql語句的問題????海牛/大米周/flowersun你们都在吗??
- fastreport的sum问题!困惑中。。。
- 这个应该是suipack控件的BUG。。。。。。。。。。。。。。。
此页面可能已经删除、更名或暂时不可用:
公司正在调整硬件,我们暂时暂停了免费用户的页面浏览功能,
如果您确定此文件存在,请通过我们为用户提供的
http://free.efile.com.cn/Home.asp?User=用户名
页面“下载”文件,“查看”功能暂停,我们会尽快恢复的,请谅解。 --------------------------------------------------------------------------------如果您在“地址”栏中键入了网址,请检查其拼写是否正确。
打开 ending722.efile.com.cn 主页,寻找指向所需信息的链接。
单击后退按钮尝试其他链接。
如果地址含有汉字,可以尝试使用下载工具下载试试看。
本公司提供网络空间服务,可能用户已经删除此文件。
免费用户文件引用地址由“http://www.efile.com.cn/efile/用户名/……”更改为“ http://free.efile.com.cn/用户名/……”;
付费用户文件引用地址由“http://www.efile.com.cn/efile/用户名/……”更改为“ http://vip.efile.com.cn/用户名/……”。
如果用户从免费用户升级到了付费用户,请更改对应域名:
free.efile.com.cn->vip.efile.com.cn
最后没办法了,将此地址通过电子邮件通知我们。
HTTP 404 - 无法找到文件
Internet 信息服务--------------------------------------------------------------------------------
...........................