查看: 1345|回复: 2
UID7301281主题帖子精华0积分802阅读权限30通道币0 个威望0 明经币0 个金钱20 个贡献26 激情701 注册时间最后登录在线时间55 小时分享
中级会员, 积分 802, 距离下一级还需 198 积分
帖子精华0通道币0 个明经币0 个
本帖最后由 zhengxiansz 于
11:27 编辑
GU_xl你好！
& && && && && &请帮我看一下这个创建文本/标注样式源码。第一次输入IT1命令时没有报错的提示。如果重复输入IT1命令时就会提示该名称已被使用，是否重新定义？请问有什么方法可以解决吗？
& && && && && &还有这个程序我增加控制保存为2004版本的环境变量值，研究了好久也没有找到是哪个变量值。
&&(defun c:IT1()
&&(prinC &标注样式&)
&&(setq cmd (getvar &cmdecho&))
&&(setvar &cmdecho& 0)
&&(setvar &OSMODE& 183)
&&(command &LTSCALE& &6&)
&&(command &-style& &TP_Standard& &isocp.shx,gbcbig.shx& && &1.0& && && &&)
&&(command &-style& &TsaiPress& &isocp.shx,gbcbig.shx& && &0.9& && && &&)
&&(command &dimtxt&& &&0.18&& && &&dimasz&& &&&&0.1&& & ;文字高度& && && && && && && && &;箭头大小
& && && &&&&dimexe&& &&0.05&& && &&dimexo&& &&&&0.05&& &;尺寸界限超出长度& && && && && & ;尺寸界限起点距离：0.5&&
& && && &&&&dimgap&& &&0.05&& && &&dimtoh&& &&&&off&& & ;标注文字周围的距离& && && && &&&;文字在尺寸界线外的位置：关& &
& && && &&&&dimtih&& &&OFF&& && & &blipmode&& &&0&& && &;标注文字在尺寸界线内的位置：& & ;关，点标记模式：关& && &
& && && &&&&DIMDLI&& &&0.05&& && &&DIMATFIT&& &&3&& && &;控制基线标注中尺寸线的间距：& & ;当尺寸界线不足放下标注文字和箭头时，函数DIMATFIT确定位置
& && && &&&&DIMTAD&& &&0&& && && &&DIMDEC&& &&&&2&& && &;控制文字相对尺寸线的垂直位置，&&;小数位数：2& && && &
& && && &&&&DIMJUST&&&&0&& && && &&DIMDSEP&& & &.&& && &;控制标注文字的水平位置：0，& &&&;小数分隔符为 .&&
& && && &&&&DIMTOFL&&&&0&& && && &&dimtmove&& &&0&& && &;控制标注文字在尺寸界线外的位置：;关对齐，设置标注文字的移动规则：0 水平
& && && &&&&dimcen&& &&0&& && && &&dimclrd&& & &0&& && &;标注圆心：不标，& && && && && & ;为尺寸线、箭头和标注引线指定颜色：3
& && && &&&&dimclre&&&&0&& && && &&DIMCLRT&& & &11&& &&&;为尺寸界线指定颜色& && && && &&&;为标注文字指定颜色
& && && &&&&DIMBLK&& &&_open30&& &&DIMLDRBLK&&&&_open30& ;箭头打开30& && && && && && && & ;箭头引线打开30
& && && &&&&DIMSCALE&&&&10&& && & &DIMTXSTY&&&&TP_Standard&& & ;全局比例& && && && && &&&;文字样式
& && && &&&&DIMSTYLE& &S& &TP_STANDARDx10&& && && && &
&&(command &dimtxt&& &&0.18&& && &&dimasz&& &&&&0.1&& & ;文字高度& && && && && && && && &;箭头大小
& && && &&&&dimexe&& &&0.05&& && &&dimexo&& &&&&0.05&& &;尺寸界限超出长度& && && && && & ;尺寸界限起点距离：0.5&&
& && && &&&&dimgap&& &&0.05&& && &&dimtoh&& &&&&off&& & ;标注文字周围的距离& && && && &&&;文字在尺寸界线外的位置：关& &
& && && &&&&dimtih&& &&OFF&& && & &blipmode&& &&0&& && &;标注文字在尺寸界线内的位置：& & ;关，点标记模式：关& && &
& && && &&&&DIMDLI&& &&0.05&& && &&DIMATFIT&& &&3&& && &;控制基线标注中尺寸线的间距：& & ;当尺寸界线不足放下标注文字和箭头时，函数DIMATFIT确定位置
& && && &&&&DIMTAD&& &&0&& && && &&DIMDEC&& &&&&2&& && &;控制文字相对尺寸线的垂直位置，&&;小数位数：2& && && &
& && && &&&&DIMJUST&&&&0&& && && &&DIMDSEP&& & &.&& && &;控制标注文字的水平位置：0，& &&&;小数分隔符为 .&&
& && && &&&&DIMTOFL&&&&0&& && && &&dimtmove&& &&0&& && &;控制标注文字在尺寸界线外的位置：;关对齐，设置标注文字的移动规则：0 水平
& && && &&&&dimcen&& &&0&& && && &&dimclrd&& & &0&& && &;标注圆心：不标，& && && && && & ;为尺寸线、箭头和标注引线指定颜色：3
& && && &&&&dimclre&&&&0&& && && &&DIMCLRT&& & &11&& &&&;为尺寸界线指定颜色& && && && &&&;为标注文字指定颜色
& && && &&&&DIMBLK&& &&_open30&& &&DIMLDRBLK&&&&_open30& ;箭头打开30& && && && && && && & ;箭头引线打开30
& && && &&&&DIMSCALE&&&&15&& && & &DIMTXSTY&&&&TP_Standard&& & ;全局比例& && && && && &&&;文字样式
& && && &&&&DIMSTYLE& &S& &TP_STANDARDx15&& && && && &
&&(command &dimtxt&& &&0.18&& && &&dimasz&& &&&&0.1&& & ;文字高度& && && && && && && && &;箭头大小
& && && &&&&dimexe&& &&0.05&& && &&dimexo&& &&&&0.05&& &;尺寸界限超出长度& && && && && & ;尺寸界限起点距离：0.5&&
& && && &&&&dimgap&& &&0.05&& && &&dimtoh&& &&&&off&& & ;标注文字周围的距离& && && && &&&;文字在尺寸界线外的位置：关& &
& && && &&&&dimtih&& &&OFF&& && & &blipmode&& &&0&& && &;标注文字在尺寸界线内的位置：& & ;关，点标记模式：关& && &
& && && &&&&DIMDLI&& &&0.05&& && &&DIMATFIT&& &&3&& && &;控制基线标注中尺寸线的间距：& & ;当尺寸界线不足放下标注文字和箭头时，函数DIMATFIT确定位置
& && && &&&&DIMTAD&& &&0&& && && &&DIMDEC&& &&&&2&& && &;控制文字相对尺寸线的垂直位置，&&;小数位数：2& && && &
& && && &&&&DIMJUST&&&&0&& && && &&DIMDSEP&& & &.&& && &;控制标注文字的水平位置：0，& &&&;小数分隔符为 .&&
& && && &&&&DIMTOFL&&&&0&& && && &&dimtmove&& &&0&& && &;控制标注文字在尺寸界线外的位置：;关对齐，设置标注文字的移动规则：0 水平
& && && &&&&dimcen&& &&0&& && && &&dimclrd&& & &0&& && &;标注圆心：不标，& && && && && & ;为尺寸线、箭头和标注引线指定颜色：3
& && && &&&&dimclre&&&&0&& && && &&DIMCLRT&& & &11&& &&&;为尺寸界线指定颜色& && && && &&&;为标注文字指定颜色
& && && &&&&DIMBLK&& &&_open30&& &&DIMLDRBLK&&&&_open30& ;箭头打开30& && && && && && && & ;箭头引线打开30
& && && &&&&DIMSCALE&&&&20&& && & &DIMTXSTY&&&&TP_Standard&& & ;全局比例& && && && && &&&;文字样式
& && && &&&&DIMSTYLE& &S& &TP_STANDARDx20&& && && && &
&&(command &dimtxt&& &&0.18&& && &&dimasz&& &&&&0.1&& & ;文字高度& && && && && && && && &;箭头大小
& && && &&&&dimexe&& &&0.05&& && &&dimexo&& &&&&0.05&& &;尺寸界限超出长度& && && && && & ;尺寸界限起点距离：0.5&&
& && && &&&&dimgap&& &&0.05&& && &&dimtoh&& &&&&off&& & ;标注文字周围的距离& && && && &&&;文字在尺寸界线外的位置：关& &
& && && &&&&dimtih&& &&OFF&& && & &blipmode&& &&0&& && &;标注文字在尺寸界线内的位置：& & ;关，点标记模式：关& && &
& && && &&&&DIMDLI&& &&0.05&& && &&DIMATFIT&& &&3&& && &;控制基线标注中尺寸线的间距：& & ;当尺寸界线不足放下标注文字和箭头时，函数DIMATFIT确定位置
& && && &&&&DIMTAD&& &&0&& && && &&DIMDEC&& &&&&2&& && &;控制文字相对尺寸线的垂直位置，&&;小数位数：2& && && &
& && && &&&&DIMJUST&&&&0&& && && &&DIMDSEP&& & &.&& && &;控制标注文字的水平位置：0，& &&&;小数分隔符为 .&&
& && && &&&&DIMTOFL&&&&0&& && && &&dimtmove&& &&0&& && &;控制标注文字在尺寸界线外的位置：;关对齐，设置标注文字的移动规则：0 水平
& && && &&&&dimcen&& &&0&& && && &&dimclrd&& & &0&& && &;标注圆心：不标，& && && && && & ;为尺寸线、箭头和标注引线指定颜色：3
& && && &&&&dimclre&&&&0&& && && &&DIMCLRT&& & &11&& &&&;为尺寸界线指定颜色& && && && &&&;为标注文字指定颜色
& && && &&&&DIMBLK&& &&_open30&& &&DIMLDRBLK&&&&_open30& ;箭头打开30& && && && && && && & ;箭头引线打开30
& && && &&&&DIMSCALE&&&&25&& && & &DIMTXSTY&&&&TP_Standard&& & ;全局比例& && && && && &&&;文字样式
& && && &&&&DIMSTYLE& &S& &TP_STANDARDx25&& && && && &
& && & (setvar &CURSORSIZE& 100)& && && && & ;将屏幕十字光标的大小设为100%
& && & (setvar &ACADLSPASDOC& 1)& && && && & ;将 acad.lsp 载入到每一个打开的图形中
& && & (setvar &ANGDIR& 1)& && && && && && & ;设置正角度的方向为顺时针
& && & (setvar &AUNITS& 0)& && && && && && & ;设置角度单位为十进位度数
& && & (setvar &CMLSCALE& 20.0000)& && && &&&;设线宽为公制
& && & (COMMAND &dimdec& &2& )& && && && && &;设尺寸小数为二位
& && & (setvar &DIMADEC& 2)& && && && && && &;设角度标注的精度为2位小数
& && & (setvar &GRIDMODE& 0)& && && && && &&&;关闭栅格
& && & (setvar &LTSCALE& 1.0000)& && && && & ;设置全局线型比例为1.0000
& && & (setvar &LUNITS& 2)& && && && && && & ;设置线性单位为小数
& && & (setvar &LWDISPLAY& 1)& && && && && & ;显示线宽
& && & (setvar &LWDEFAULT& 25)& && && && && &;设置默认线宽的值为25
& && & (setvar &LWUNITS& 1)& && && && && && &;设线宽单位以毫米显示
& && & (setvar &MEASUREINIT& 1)& && && && &&&;设置初始图形单位为公制
& && & (setvar &PSLTSCALE& 1)& && && && && & ;设图纸空间的线型比例为1：1
& && & (setvar &SNAPMODE& 0)& && && && && &&&;关闭&捕捉&方式
& && & (setvar &TOOLTIPS& 1)& && && && && &&&;显示工具栏提示
& && & (setvar &TRACEWID& 0.3)& && && && && &;设置宽线的默认宽度为0.3MM
& && & (setvar &TRAYICONS& 1)& && && && && & ;控制是否在状态栏上显示系统托盘
& && & (setvar &TRAYNOTIFY& 1)& && && && && &;控制是否在状态栏系统托盘上显示服务通知
& && & (setvar &ISAVEBAK& 0)& && && && && &&&;控制备份文件 (BAK) 的创建。& & 1，创建& & 0，不创建
& && & (setvar &APERTURE& 25)& && && && && & ;以像素为单位设置靶框显示尺寸。靶框是绘图命令中使用的选择工具。初始值：10
& && & (setvar &PICKBOX& 15)& && && && && &&&;控制拾取框大小
& && & (setvar &savetime& 0)& && && && && &&&;控制自动保存。
& && & (setvar &ACISOUT& 16)& && && && && &&&;控制保存的版本
& && & (setvar &qaflags& 0)& && && && && && &;取消选择先后顺序
& && & (COMMAND&&&OSMODE&&&&439& )& && && &&&;常用捕捉打开
& && & (COMMAND &dimtol& &0&)& && && && && & ;去掉“±0.00”符号
UID338795主题帖子精华0积分11517阅读权限60通道币0 个威望3 明经币460 个金钱2256 个贡献392 激情5813 注册时间最后登录在线时间597 小时分享
钻石会员, 积分 11517, 距离下一级还需 3483 积分
帖子精华0通道币0 个明经币460 个
设置默认保存格式2004
(setenv &DefaultFormatForSave& &24&)
empty your mind...
be formless, shapeless.
like water...
you put water into a bottle it becomes to bottle
you put water into a teapot it becomes to teapot
water can flow,
or can crash...
be water my friend..
UID7301281主题帖子精华0积分802阅读权限30通道币0 个威望0 明经币0 个金钱20 个贡献26 激情701 注册时间最后登录在线时间55 小时分享
中级会员, 积分 802, 距离下一级还需 198 积分
帖子精华0通道币0 个明经币0 个
edata 发表于
设置默认保存格式2004
谢谢！我按照你的方法设置成功了。
& 明经通道 版权所有 本站代码，在未取得本站及作者授权的情况下，不得用于商业用途
Powered by用极限偏差标注程序为例,说明AutoLISP程序如何读取Excel数据库文件.
扫扫二维码，随身浏览文档
手机或平板扫扫即可继续访问
AutoLISP语言与Excel文本文件接口处理
举报该文档为侵权文档。
举报该文档含有违规或不良信息。
反馈该文档无法正常浏览。
举报该文档为重复文档。
推荐理由：
将文档分享至：
分享完整地址
文档地址：
粘贴到BBS或博客
flash地址：
支持嵌入FLASH地址的网站使用
html代码：
&embed src='/DocinViewer-4.swf' width='100%' height='600' type=application/x-shockwave-flash ALLOWFULLSCREEN='true' ALLOWSCRIPTACCESS='always'&&/embed&
450px*300px480px*400px650px*490px
支持嵌入HTML代码的网站使用
您的内容已经提交成功
您所提交的内容需要审核后才能发布，请您等待！
3秒自动关闭窗口120个绝对实用的CAD技巧_百度文库
两大类热门资源免费畅读
续费一年阅读会员，立省24元！
评价文档：
31页免费36页免费36页1下载券41页免费31页免费37页免费9页免费73页免费36页免费21页5下载券
喜欢此文档的还喜欢3页1下载券37页免费
120个绝对实用的CAD技巧|
把文档贴到Blog、BBS或个人站等：
普通尺寸(450*500pix)
较大尺寸(630*500pix)
你可能喜欢cad里面excel的格式匹配问题_百度知道
cad里面excel的格式匹配问题
在cad里以cad图元形式粘贴过来的excel表怎么用格式刷来匹配格式呢？包括字体、字体颜色、大小吖之类的
提问者采纳
.&quot，单元格的内容可以是单行文字或多行文字。CAD中表格的表格线可由水平或垂向的直线或多段线组成，支持已合并单元格的转换。且支持一个单元格内有多个文本的转换.;;是一款AutoCAD表格提取到Excel软件&MagicTable(魔法表格)&MagicTable(魔法表格)&quot
提问者评价
其他类似问题
56人觉得有用
excel的相关知识
按默认排序
其他2条回答
格式刷处理不了，要在excel里调
MA格式刷，最好用天正 他有导入表格
您可能关注的推广
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁}