如何grid里都不支持windows系统自带的鼠标右键弹出菜单的复制粘贴功能

怎么grid里都不支持windows系统自带的鼠标右键弹出菜单的复制粘贴功能
用grid浏览数据时，新增一条记录有时想复制上面的数据要用ctrl+c和ctrl+v
怎么都不支持鼠标右键弹出菜单选择“复制”和“粘贴”的，这是windows的系统功能呀？要实现怎么办？

------解决方案--------------------
需要自已写代码
------解决方案--------------------
如：

表单的Activate事件：

FOR I=1 TO this.grid1.columncount
J=TRANSFORM(I)
=BINDEVENT(THIS.GRID1.COLUMN&J..TEXT1, "RightClick ",THIS, "MyGridRightClick ")
ENDFOR


给表单建个方法，方法名称为：MyGridRightClick
方法代码为：
ACTIVATE POPUP shortcut AT MROW(),MCOL()


在表单的Load事件中加代码：
DEFINE POPUP shortcut SHORTCUT RELATIVE FROM MROW(),MCOL()
DEFINE BAR 1 OF shortcut PROMPT " <关闭菜单> "
DEFINE BAR 2 OF shortcut PROMPT "\- "
DEFINE BAR 3 OF shortcut PROMPT "复制 (\ <C) "
DEFINE BAR 4 OF shortcut PROMPT "粘贴 (\ <P) "
ON SELECTION BAR 3 OF shortcut PBBFORM.CMD_MenuClick.CLICK(1)
ON SELECTION BAR 4 OF shortcut PBBFORM.CMD_MenuClick.CLICK(2)


运行表单时：
do form 表单名.scx name pbbform


表单上建个按钮，名称为CMD_MenuClick，其Click事件代码：
PARAMETERS tnMenuID
DO CASE
CASE tnMenuID=1
IF TYPE( 'aPbbRb_DQJL ')= 'U '
PUBLIC aPbbRb_DQJL(50)
ENDIF
SCATTER TO aPbbRb_DQJL &&DQJL=当前记录
CASE tnMenuID=2
GATHER FROM aPbbRb_DQJL
ENDCASE
THIS.Parent.GRID1.SETFOCUS


这个是复制一行记录，单个单元格可以用更简单的方法