RxRichEdit为什么设置PopubMenu无效。(20分)

  • 主题发起人 主题发起人 猎手1号
  • 开始时间 开始时间

猎手1号

Unregistered / Unconfirmed
GUEST, unregistred user!
我原来用RichEdit一切正常,改用RxRichEdit之后,设定了PopupMenu属性,但运行中在
上面点击右键时,菜单就是不弹出来。这是什么原因。
 
到底设了没有,在什么地方设的。不会吧
 
确定是设了,当然是在RxRichEdit的popupMenu属性中设的。
 
//在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;
 
接受答案了.
 
后退
顶部