Delphi背后---初学者参考之二(1)[7]

[入库:2005年8月18日] [更新:2007年3月24日]

本文简介:选择自 huojiehai 的 blog

u       然后再新建一个工程,单击【file->new->application】,把mycontrol页中的mypanel拖到form上,按f11键,切换到events页,如下:

tpanel比较一下,看是不是多了onmouseenteronmouseleave事件。双击onmouseenter,写代码如下:

procedure tform1.mypanel1mouseenter(sender: tobject);

begin

  showmessage('鼠标进入mypanel1');

end;

然后按f9运行,移动鼠标到mypanel1上,看一下结果如何。

本文关键:VCL、API、COM、嵌入式汇编语言
 

本站最佳浏览方式为 分辨率 1024x768 IE 6.0(或更高版本的 IE浏览器)

go top