procedure TfrmCollect.RxRichEdit1MouseDown(Sender: TObject;
Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
if (ssRight in Shift) then
begin
RxRichEdit1.PopupMenu:= PopupMenu1;
end;
end;在 RxRichEdit1 的属性 PopupMenu 里面也也连接了 PopupMenu1
怎么就是没反应呢,奇怪!!
Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
if (ssRight in Shift) then
begin
RxRichEdit1.PopupMenu:= PopupMenu1;
end;
end;在 RxRichEdit1 的属性 PopupMenu 里面也也连接了 PopupMenu1
怎么就是没反应呢,奇怪!!
解决方案 »
- 如何在桌面画坐标系???急,急,急高分求解.
- 在两个表中比较两条记录的问题
- 想自己注册一个公司,已经交了50个名字了还是通不过,有没有哪位高人帮想想办法,帮顶一下也行,急死人了·
- 关于网卡MAC号的几点疑问?请大家来发表观点
- 98下调用DTS出错,有谁知道怎么办?
- 可以把一个大系统里的子系统做成DLL吗?
- TidMessage发送邮件如何添加附件?
- 至今无人解决:抓图游戏屏幕和电影屏幕,注意:不是抓取一般屏幕。高手请进!
- 怎样强行结束线程?注意是强行
- Microsoft OutLook 式样的卷动按钮盒的免费 控件下载,高分!!!
- 菜鸟求教:怎么在listview中动态增加一列?
- 请教关于进销存系统中月结存年结存功能的设计原理?
if (ssRight in Shift) then
RxRichEdit1.PopupMenu.Popup(Mouse.CursorPos.X,Mouse.CursorPos.Y);