(cond ((=c1 6005)--此处6005改为用户的Zoom Window菜单项返回码;
((=c1 6007)--此处6007改为用户的Zoom Previous菜单项返回码;
((=c1 6008)--此处6008改为用户的Zoom All菜单项返回码;
((=c1 6011)--此外6011改为用户的Pan菜单项返回码;
五、结语
应用本程序,可在制图过程中很方便地实现某些特定角度和长度的捕捉,简化了操作步骤和击键次数,根据目前的使用情况来看,画线时可提高作图速度4倍以上。至于AutoCAD内部提供的正交和网点捕捉只是本程序当捕捉角度为 90°时的一个特例。
将本程序的画线子模块 draw()中语句行
(command"line" pstart pend "")
最新相关文章
发表评论