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