如果你想用鼠标右键点击其他对象(pushbutton为例)弹出菜单:
1、创建新的scl如下:
ONPOPUP: PUBLIC method;
dcl list listMenu;
dcl num numRC;
/*****拷贝上贴那些生成临时菜单的语句*****/
return;
2、打开pushbutton属性,找到pushbutton->Methods->Inherited->_onPopup方法,鼠标右击它,选择Override
3、在Overridden->_onPopup->Source Entry中选择你刚才保存的scl,在Source Label中指定ONPOPUP,在Enable中设成Yes作者: shiyiming 时间: 2003-9-26 17:10 标题: Thanks a lot! Thank you very much!
It will be very useful for me to do my current job.