猎 猎手1号 Unregistered / Unconfirmed GUEST, unregistred user! 2002-11-25 #1 我原来用RichEdit一切正常,改用RxRichEdit之后,设定了PopupMenu属性,但运行中在 上面点击右键时,菜单就是不弹出来。这是什么原因。
猎 猎手1号 Unregistered / Unconfirmed GUEST, unregistred user! 2002-11-26 #3 确定是设了,当然是在RxRichEdit的popupMenu属性中设的。
W wind2000 Unregistered / Unconfirmed GUEST, unregistred user! 2002-11-26 #5 //在RichEdit中设置PopupMenu属性是没用的,要自已写 procedure TForm1.RichEditMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); {右键菜单} var CurPos : Tpoint; begin if Button = mBright then begin GetCursorPos(CurPos); EditPopupMenu.Popup(CurPos.X, CurPos.Y); end; end;
//在RichEdit中设置PopupMenu属性是没用的,要自已写 procedure TForm1.RichEditMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); {右键菜单} var CurPos : Tpoint; begin if Button = mBright then begin GetCursorPos(CurPos); EditPopupMenu.Popup(CurPos.X, CurPos.Y); end; end;