会者不难,鼠标的小问题!!(20分)

  • 主题发起人 主题发起人 hanliu
  • 开始时间 开始时间
H

hanliu

Unregistered / Unconfirmed
GUEST, unregistred user!
当用鼠标点击窗体中的元件时,如何得知点中的是TRichedit、TImage还是TPanel
 
首先建立一个popmenu,然后以下的代码就可<br>以告诉你刚才右击的对象名称:Popup?Menu1.PopupComponent.<br>ClassName。^_^
 
也可以拦截focuschange事件^_^
 
能用程序来说得具体点吗?
 
在Click事件中<br>&nbsp; ShowMessage(String(Sender.ClassName));
 
是不是所有的控件都要click啊,太烦了吧!
 
所有控件都要click事件是有点烦<br>有没有简单点的啊
 
事件OnClick(Sender:Object);<br>你只要判断<br>If (Sender Is TRichedit) Then<br>Begin<br>&nbsp; (Sender As TRichedit)<br>End<br>至于TImage、TPanel,也同样处理。<br>
 
你可以把楼上的代码写成一个的publish过程,窗口上的所有控件的OnClick事件引用这个过程就好了。
 
简单极了:<br>GetClassName(hwnd, pstr, pstrlen);<br>pstr返回classname;
 
多人接受答案了。
 
后退
顶部