保存桌面快捷方式 - - 设为首页 - 手机版
凹丫丫旗下网站：四字成语大全 - 故事大全 - 范文大全
热门搜索： 百度  工作总结  工作计划  十八大  毕业论文  毕业设计  读后感  下乡工作总结  思想汇报  述职报告 
您现在的位置： 范文大全 >> 理工论文 >> 计算机信息技术 >> 正文

创建自己的Dephi构件

  FonMouseEnter(self);

End;

Procedure  CM_MouseEnter(var msg :Tmessage);

Begin

    Inherited;

    MouseEnter;

End;

5. 增加事件OnMouseEnter 和 OnMouseLeave

加入如下的代码:

Private

   

FonMouseEnter,FonMouseLeave :TnotifyEvent;

Published

    OnMouseEnter : TnotifyEvent

    Read FonMouseEnter write FonMouseEnter;

    OnMouseLeave : TnotifyEvent

    Read  FonMouseLeave  Write  FonMouseLeave;

6. MouseLeave CM_MouseLeave的实现代码与MouseEnter CM_MouseEnter的类似 。Dephi 为所有消息提供缺省处理。在写消息句柄时应 禁止缺省处理，因此在CM_MouseEnter和 CM_MouseLeave过程中调用了 inherited。

        重载构造和析构方法的代码如下：

Publ

《创建自己的Dephi构件(第5页)》
 «   1   2   3   4   5   6   » 
本文链接地址：http://www.oyaya.net/fanwen/view/142642.html
  • 上一篇范文： 在应用程序客户端备份和恢复MSSQL SERVER数据库的一种方法
  • 下一篇范文： 计算机软件发展四十五年

    • 　★读了本文的人也读了：
    ★温馨提示：你可以返回到　计算机信息技术　也可以利用本站页顶的站内搜索功能查找你想要的文章。