我想做个右键弹出的菜单，只知道菜单的菜单项复制命令是_med_copy，但是我想给复制命令写到过程里去，就是点这个菜单项就先复制，然后用调用剪切板里刚才复制的文字做别的事情，所以请问老师们，在过程中复制文本的命令怎么写啊？ 谢谢老师们先！

啊 刚弄出来了。。。模拟了下键盘。。。真笨了。。
可是还有个问题，代码如下
KEYBOARD '{CTRL+c}'
decl inte ShellExecute in shell32.dll inte hwnd,stri, stri tmFile, stri,stri,inte
ShellExecute(0,"open","http://www.,0,0,1)

每次弹出来的搜索页都是剪切板里先前的文本，不是刚才划上的，请老师指教下怎么解决这个问题啊？？

_ClipText=“。。。”

DEFINE POPUP cd1 FONT '宋体', 12 SHORTCUT RELATIVE FROM MROW(),MCOL()
DEFINE BAR _med_undo OF cd1 PROMPT "撤销(\<U)"
DEFINE BAR _med_redo OF cd1 PROMPT "重做(\<D)"
DEFINE BAR 3 OF cd1 PROMPT "\-"
DEFINE BAR _med_cut OF cd1 PROMPT "剪切(\<T)"
DEFINE BAR _med_copy OF cd1 PROMPT "复制(\<C)"
DEFINE BAR _med_paste OF cd1 PROMPT "粘贴(\<P)"  SKIP FOR EMPTY(_cliptext)
DEFINE BAR _med_clear OF cd1 PROMPT "删除(\<A)"
ACTIVATE POPUP cd1

谢谢版主，我给它改成这样还是不行啊
KEYBOARD '{CTRL+c}'
AAA=_cliptext
decl inte ShellExecute in shell32.dll inte hwnd,stri, stri tmFile, stri,stri,inte
ShellExecute(0,"open","http://www.,0,0,1)

不用剪贴板也可以：
object=....(对象)
……
ShellExecute(0,"open","http://www.,0,0,1)

object=....(edt简介2)
......
ShellExecute(0,"open","http://www.,0,0,1)
亲爱的版主。。。我写成这样也不行啊，请问应该怎么改啊 ？ 谢谢您啦

你是不是没有选择文本啊？
text=....(edt简介2).seltext
......
ShellExecute(0,"open","http://www.,0,0,1)

如果要用KEYBOARD '{CTRL+c}'的话，你必须在建立了主菜单且包含“编辑”下常用菜单（比如：复制）的情况下才能有用。

text=....(edt简介2).seltext
......
ShellExecute(0,"open","http://www.,0,0,1)

text=....(edt简介2).seltext
......
ShellExecute(0,"open","http://www.,0,0,1)

为什么还是不行啊
说第一行那句无法识别，我的表单里有 edt简介2 这个东西啊 老师们帮想想是哪有问题吧。。