明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 2800|回复: 5

斑主 各位大侠请教CAD菜单问题!

[复制链接]
发表于 2004-10-21 11:05 | 显示全部楼层 |阅读模式
版主和各位大侠:


请问用VB程序怎样实现CAD中的系统菜单(顶部菜单)与自己开发的菜单之间的转换?(即当单击某一菜单时,将显示CAD系统菜单,再次点击时将显示自己开发的菜单?)
发表于 2004-10-21 13:50 | 显示全部楼层
你在你要设计的菜单[或按钮菜单, 但规定这个菜单在你开发的和原样的cad都装上] 然所在这个菜单上加上如下的代码就可以实现, 你参考参考 (cond
((=(VL-FileName-Base (getvar "menuname"))"acad") (command ".menu" "c:\\XXXXX\\XX\\我的菜单.mnu"));
((=(VL-FileName-Base (getvar "menuname"))"我的菜单") (command ".menu" "c:\\XXXXX\\XX\\acad.mnu"))) 以上代码的意思是, 如运行就判断如是cad的菜单就装上你的菜单, 如运行判断出是你开发的菜单就装cad的菜单. 这样就可以了吧.
 楼主| 发表于 2004-10-22 10:54 | 显示全部楼层
版主,这样倒是可以实现。不过实在不好意思,请问怎样才能将*.menu中的菜单项与自己设计的VB程序连接起来呀? 谢谢!
发表于 2004-10-28 18:10 | 显示全部楼层
谢谢版主
发表于 2008-2-23 22:30 | 显示全部楼层
学习学习  很好的
发表于 2008-2-23 22:31 | 显示全部楼层

学习学习  很好的贴子  项一下  

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-6-3 02:14 , Processed in 0.146262 second(s), 23 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表