东哥,这个菜单怎么实现?
我想在选中一个实体时所出现的右键菜单中加入一个菜单项,该怎么修改莱单文件？当然不是修改acad.mnu了，是修改自定义的菜单，是用menuload加载的那个菜单，如cag.mnu.
第一次来这个版块，请多多指教！ 我没有做过，不过我想可以按照下面的方式试试：<BR><BR> [默认模式的上下文菜单]<BR>ID_CMNonLast [重复%s(&R)]^C^C;<BR> [--]<BR>ID_Cutclip [剪切(&T)]^C^C_cutclip <BR>ID_Copyclip [复制(&C)]^C^C_copyclip <BR>ID_Copybase [带基点复制(&B)]^C^C_copybase <BR>ID_Pasteclip [粘贴(&P)]^C^C_pasteclip <BR>ID_Pastebloc [粘贴为块(&K)]^C^C_pasteblock <BR>ID_Pasteorig [粘贴到原坐标(&D)]^C^C_pasteorig <BR> [--]<BR>ID_U [放弃(&U)]^C^C_u <BR>ID_Redo [重做(&D)]^C^C_mredo 1 <BR>ID_Pan [平移(&A)]'_pan <BR>ID_ZoomRealt [缩放(&Z)]'_zoom ;<BR> [--]<BR>ID_Filter [快速选择(&Q)...]^C^C_qselect <BR>ID_TextFind [查找(&F)...]^C^C_find <BR>ID_Preferenc [选项(&O)...]^C^C_options
***POP502<BR>**CMEDIT<BR> [编辑模式的上下文菜单]<BR>ID_CMSelLast [重复%s(&R)]^C^C;<BR> [--]<BR>ID_Cutclip [剪切(&T)]^C^C_cutclip <BR>ID_Copyclip [复制(&C)]^C^C_copyclip <BR>ID_Copybase [带基点复制(&B)]^C^C_copybase <BR>ID_Pasteclip [粘贴(&P)]^C^C_pasteclip <BR>ID_Pastebloc [粘贴为块(&K)]^C^C_pasteblock <BR>ID_Pasteorig [粘贴到原坐标(&D)]^C^C_pasteorig <BR> [--]<BR>ID_Erase [删除(&E)]^C^C_erase <BR>ID_Move [移动(&M)]$M=$(if,$(eq,$(substr,$(getvar,cmdnames),1,4),GRIP),_move,^C^C_move) <BR>ID_Copy [复制选择(&Y)]$M=$(if,$(eq,$(substr,$(getvar,cmdnames),1,4),GRIP),_copy,^C^C_copy) <BR>ID_Scale [缩放(&L)]$M=$(if,$(eq,$(substr,$(getvar,cmdnames),1,4),GRIP),_scale,^C^C_scale) <BR>ID_Rotate [旋转(&O)]$M=$(if,$(eq,$(substr,$(getvar,cmdnames),1,4),GRIP),_rotate,^C^C_rotate) <BR> [--]<BR>ID_Deselectall [全部不选(&A)]^C^C^P(ai_deselect) ^P<BR> [--]<BR>ID_Filter [快速选择(&Q)...]^C^C_qselect <BR>ID_TextFind [查找(&F)...]^C^C_find <BR>ID_Ai_propch [特性(&S)]^C^C_properties <BR><BR>以上是原菜单文件中的语句，加上自己的东西就可以吧。<BR> 这样不行的,谁能帮我？ 不行吗？我怎么觉得是可以的呢？也许问题在于你要加入什么？ C:\Documents and Settings\cag\桌面\demo.bmp
如图所示，这是我用VBA编的，现在我想用菜单文件来实现，是一个自定义的菜单文件，并不是acad.mnu文件，加入东哥所说的代码，我试过了，不行，怎么办呢？
还有，谁知道用VL编又怎么实现？ 是要修改右键菜单吗? 是啊,能帮我吗?
最好三种方法你都会. 右键菜单只能通过acad.mnu或程序实现，而不能放到自己的菜单文件中。 用VBA我知道怎么实现,那用VL怎么实现? vl能直接访问右键菜单吗.
页:
[1]