K kmchen Unregistered / Unconfirmed GUEST, unregistred user! 2007-09-04 #1 我为edit设置鼠标右键点击事件,一直运行正常,突然:在edit上点击鼠标右键不会响应我的事件,而是出现:粘贴,删除。。。。。从右向左的顺序阅读等等。后发现,包括combobox上点击鼠标右键也是一样的,不懂,请各位大大指点我下。兄弟在电脑前含泪等待中。谢谢。
我为edit设置鼠标右键点击事件,一直运行正常,突然:在edit上点击鼠标右键不会响应我的事件,而是出现:粘贴,删除。。。。。从右向左的顺序阅读等等。后发现,包括combobox上点击鼠标右键也是一样的,不懂,请各位大大指点我下。兄弟在电脑前含泪等待中。谢谢。
那 那年黄梅花开 Unregistered / Unconfirmed GUEST, unregistred user! 2007-09-05 #2 我试了,不会的 procedure TForm1.Edit1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); begin if Button = mbRight then ShowMessage('ss'); end;
我试了,不会的 procedure TForm1.Edit1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); begin if Button = mbRight then ShowMessage('ss'); end;
加 加油+加油 Unregistered / Unconfirmed GUEST, unregistred user! 2007-09-05 #4 呵呵,是你改了Edit1的PopupMemu的属性 你重新设置一下opupMemu为PopupMenu1就可以了