找回密码
 立即注册

QQ登录

只需一步,快速开始

扫一扫,访问微社区

查看: 1829|回复: 17

[求助] eachy老大的 函数(ea:init) 哪里有?

[复制链接]

已领礼包: 3198个

财富等级: 富可敌国

发表于 2014-11-19 08:57:29 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?立即注册

×
eachy老大发布的很多程序里都有用到(ea:init) ,可找到好久没有找到这个函数...
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!

已领礼包: 593个

财富等级: 财运亨通

发表于 2014-11-19 09:55:36 | 显示全部楼层
用来解析一个保存 出图比例、图形单位、字高词典的函数
  1. (defun ybl-init        ()
  2.   (if (> (atof (getvar "acadver")) 15.)
  3.     (vl-load-com)
  4.   )
  5.   (if (not (vlax-ldata-get "Ea_dict" "ea_contrl"))
  6.     (vlax-ldata-put "Ea_dict" "ea_contrl" "1000.|0.001|3.0")
  7.   )
  8.   (mapcar 'read
  9.           (ybl-str-parse (vlax-ldata-get "Ea_dict" "ea_contrl") "|")
  10.   )
  11. )



点评

谢谢eachy老大! 还有一个也是没找到 $EADCL_CHECKIN  详情 回复 发表于 2014-11-19 10:27
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 3198个

财富等级: 富可敌国

 楼主| 发表于 2014-11-19 10:27:41 | 显示全部楼层
eachy 发表于 2014-11-19 09:55
用来解析一个保存 出图比例、图形单位、字高词典的函数

谢谢eachy老大!{:soso_e179:}
还有一个也是没找到 $EADCL_CHECKIN

点评

可以用 XD:CL 里面函数替代  详情 回复 发表于 2014-11-19 10:58
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2014-11-19 10:58:26 | 显示全部楼层
lucas3 发表于 2014-11-19 10:27
谢谢eachy老大!
还有一个也是没找到 $EADCL_CHECKIN

可以用  XD::DCL 里面函数替代



点评

大师,您好!关说eachy站长的贴子http://bbs.xdcad.org/thread-658127-1-1.html 的12楼有一个出图的代码,能说一说具体有什么作用呢? 怎么使用呢? 可以改变些什么呢? [attachimg]11425[/attachimg]  详情 回复 发表于 2014-11-19 13:04
知道了,谢谢Free-Lancer大师  详情 回复 发表于 2014-11-19 11:59
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 3198个

财富等级: 富可敌国

 楼主| 发表于 2014-11-19 11:59:13 | 显示全部楼层
Free-Lancer 发表于 2014-11-19 10:58
可以用  XD:CL 里面函数替代

知道了,谢谢Free-Lancer大师
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 3198个

财富等级: 富可敌国

 楼主| 发表于 2014-11-19 13:04:22 | 显示全部楼层
Free-Lancer 发表于 2014-11-19 10:58
可以用  XD:CL 里面函数替代

大师,您好!关说eachy站长的贴子http://bbs.xdcad.org/thread-658127-1-1.html 的12楼有一个出图的代码,能说一说具体有什么作用呢? 怎么使用呢? 可以改变些什么呢?
sshot-5.png

论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 1268个

财富等级: 财源广进

发表于 2014-11-19 13:44:16 | 显示全部楼层
lucas3 发表于 2014-11-19 13:04
大师,您好!关说eachy站长的贴子http://bbs.xdcad.org/thread-658127-1-1.html 的12楼有一个出图的代码 ...

界面上的字很清楚啊! 出图比例、文字高度、绘图单位

点评

可是还是不懂啊,可能不同专业的缘故吧,能不能来个演示啊 ,好奇!  详情 回复 发表于 2014-11-19 13:54
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 3198个

财富等级: 富可敌国

 楼主| 发表于 2014-11-19 13:54:46 | 显示全部楼层
st788796 发表于 2014-11-19 13:44
界面上的字很清楚啊! 出图比例、文字高度、绘图单位

可是还是不懂啊,可能不同专业的缘故吧,能不能来个演示啊 ,好奇!
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 1268个

财富等级: 财源广进

发表于 2014-11-19 14:06:00 | 显示全部楼层
lucas3 发表于 2014-11-19 13:54
可是还是不懂啊,可能不同专业的缘故吧,能不能来个演示啊 ,好奇!

你用 AutoCAD 打图时没有用过 比例? 画图时 1m 在图中输入多少?

点评

没用过米的单位,都是以毫米为单位, 像1米这么长,就是输入的1000  详情 回复 发表于 2014-11-19 14:27
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 3198个

财富等级: 富可敌国

 楼主| 发表于 2014-11-19 14:27:36 | 显示全部楼层
st788796 发表于 2014-11-19 14:06
你用 AutoCAD 打图时没有用过 比例? 画图时 1m 在图中输入多少?

没用过米的单位,都是以毫米为单位, 像1米这么长,就是输入的1000

点评

这个对应的绘图单位是 MM "毫米",图中文字实际高度应该是 ”出图比例 x 绘图单位 x 字高“ 比如 出图比例 1:1000,绘图单位 MM,字高 3.0 ,那在图中写 Text 的高度就是 1000 x 1.0 x 3.0 = 3000.0 出图比例  详情 回复 发表于 2014-11-19 14:47
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 859个

财富等级: 财运亨通

发表于 2014-11-19 14:47:16 | 显示全部楼层
lucas3 发表于 2014-11-19 14:27
没用过米的单位,都是以毫米为单位, 像1米这么长,就是输入的1000

这个对应的绘图单位是 MM "毫米",图中文字实际高度应该是 ”出图比例 x 绘图单位 x 字高“

比如
出图比例 1:1000,绘图单位 MM,字高 3.0 ,那在图中写 Text 的高度就是 1000 x 1.0 x 3.0 = 3000.0
出图比例 1:1000,绘图单位 M,字高 2.5 ,那么图中写字 Text 的高度就是 1000 x 0.001 x 2.5 = 2.5

点评

很好的解释, 有一点明白了, 但是程序运行后是改变了drawing 中的什么呢?变量,全局比例还是什么? 我怎么什么也没看到改变呢?  详情 回复 发表于 2014-11-19 14:54
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 3198个

财富等级: 富可敌国

 楼主| 发表于 2014-11-19 14:54:21 | 显示全部楼层
csharp 发表于 2014-11-19 14:47
这个对应的绘图单位是 MM "毫米",图中文字实际高度应该是 ”出图比例 x 绘图单位 x 字高“

比如

很好的解释, 有一点明白了, 但是程序运行后是改变了drawing 中的什么呢?变量,全局比例还是什么? 我怎么什么也没看到改变呢?
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 1268个

财富等级: 财源广进

发表于 2014-11-19 15:21:02 | 显示全部楼层
lucas3 发表于 2014-11-19 14:54
很好的解释, 有一点明白了, 但是程序运行后是改变了drawing 中的什么呢?变量,全局比例还是什么? 我 ...

设置是全局的,后面自己的程序中只要写字就查询词典,按照当前设置的数值确定文字高度

点评

我试过好多次,无论输入文字,还是标注,都没见到改变啊 下面是dcl  详情 回复 发表于 2014-11-19 15:28
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 3198个

财富等级: 富可敌国

 楼主| 发表于 2014-11-19 15:28:41 | 显示全部楼层
st788796 发表于 2014-11-19 15:21
设置是全局的,后面自己的程序中只要写字就查询词典,按照当前设置的数值确定文字高度

我试过好多次,无论输入文字,还是标注,都没见到改变啊
请点击此处下载

查看状态:需购买或无权限

您的用户组是:游客

文件名称:scale.lsp 
下载次数:0  文件大小:4.37 KB 
下载权限: 助理工程师 以上  [免费赚D豆]



下面是dcl
  1. ea_setgloble: dialog {
  2.   label  = "绘图参数 EaTools";
  3.   : row {
  4.     fixed_width = true;
  5.     : boxed_column {
  6.       label = "出图比例";   
  7.       : edit_box {
  8.         key = "scal";
  9.         fixed_width = true;
  10.         edit_width = 8;
  11.         edit_limit = 8;
  12.         mnemonic = "C";
  13.         }
  14.       : popup_list {
  15.         key = "scal_list";
  16.         edit_width = 10;
  17.         list = "1:100\n1:200\n1:300\n1:500\n1:1000\n1:1500\n1:2000\n1:3000\n1:5000\n1:10000\n1:25000\n1:50000\n1:250000\n1:1000000";
  18.         }
  19.       }
  20.       : boxed_column {
  21.         label = "绘图单位";
  22.         : radio_button {
  23.           label       = "米M";
  24.           mnemonic    = "M";
  25.           key         = "un_m";
  26.           is_tab_stop = false;
  27.           }
  28.         : radio_button {
  29.           label       = "毫米H";
  30.           mnemonic    = "H";
  31.           key         = "un_h";
  32.           is_tab_stop = false;
  33.           }
  34.         }
  35.     }
  36.   : boxed_row {
  37.     label = "文字高度: ";
  38.     : edit_box {
  39.       label = "H:";
  40.       key = "hig";
  41.       fixed_width = true;
  42.       edit_width = 8;
  43.       }
  44.     : popup_list {
  45.       key = "hig_list";
  46.       edit_width = 8;
  47.       list = "2.0\n2.5\n3.0\n3.5\n4.0\n4.5\n5.0";
  48.       }
  49.     }      
  50.   ok_cancel;
  51. }

论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 1268个

财富等级: 财源广进

发表于 2014-11-19 16:43:09 | 显示全部楼层
lucas3 发表于 2014-11-19 15:28
我试过好多次,无论输入文字,还是标注,都没见到改变啊

这个仅仅是写 dict 不改变你图中任何东西

点评

ST大师的意思是,标注或者写文字的程序还要自己写, 在标注或写文字时读取字典?  详情 回复 发表于 2014-11-19 16:48
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

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

本版积分规则

QQ|申请友链|Archiver|手机版|小黑屋|辽公网安备|晓东CAD家园 ( 辽ICP备15016793号 )

GMT+8, 2024-3-29 22:27 , Processed in 0.234890 second(s), 61 queries , Gzip On.

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

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