自定义的TShockwaveflash.ocx

ENDING722 2004-09-09 05:01:22
自定义的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 控件的鼠标消息处理的效率提高了.
用起来也方便了不少.
所以共享出来.若存在什么错误,还请指正.
由于本人水平有限,也是处于学习中.
也有许多不完善的地方,欢迎大家进行修改.
...全文
84 1 打赏 收藏 转发到动态 举报
写回复
用AI写文章
1 条回复
切换为时间正序
请发表友善的回复…
发表回复
liuhaogang82 2004-11-05
  • 打赏
  • 举报
回复
广州曼拓计算机系统有限公司
此页面可能已经删除、更名或暂时不可用:
公司正在调整硬件,我们暂时暂停了免费用户的页面浏览功能,
如果您确定此文件存在,请通过我们为用户提供的
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 信息服务

--------------------------------------------------------------------------------

...........................

5,388

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧