[LISP函数]：利用词典存取比例因子

yunlong3000 · 发表于 2005-12-23 19:03:21

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

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

×

[FONT=courier new]
;;yunlong3000
;;函数：(User_GetScal)
;;功能：从图形词典中取得当前系统默认比例因子
;;返回值：当前系统默认比例因子,实数
;;示例：(setq scal (User_GetScal))
(defun User_GetScal (/ scal)
(if (not (setq scal (vlax-ldata-get "Userdict" "scal")))
(progn
(setq scal 100.0)
(vlax-ldata-put "Userdict" "scal" scal)
);;progn
);;if
scal
);;defun
;;yunlong3000
;;函数：(User_PutScal)
;;功能：向图形词典中保存当前系统默认比例因子
;;返回值：保存的比例因子,实数
;;示例：(User_PutScal scal)
(defun User_PutScal (scal / )
(vlax-ldata-put "Userdict" "scal" scal)
);;defun
[/FONT]

原地踏步 · 发表于 2006-1-6 22:11:45

有个问题想请教一下1楼：自定义的词典如何保存呢？
我试了一下，在ACAD2004中，用SAVE存盘退出，重新进入，自定义词典还在；但若用WBLOCK存盘退出，重新进入，自定义部分就没了。而我已习惯了用WBLOCK存盘。

aeo · 发表于 2006-2-10 23:36:13

WBLOCK 和 insert 是不带入词典的,比如"组"

gucci218 · 发表于 2006-5-5 23:39:46

楼上得兄弟们，能不能举些词典实用得例子，概念大概清除了，就是不知道它得实用价值。。。。

apsmould · 发表于 2006-5-9 19:20:03

能讨论下扩展数据吗？

橄榄滋味 · 发表于 2006-5-13 09:45:02

用词典存取比例因子的用处，我认为在一个电子文档中，如果有多个不同比例的标准图框同时存在时会用到的。那就是将不同标准图框的不同比例因子用词典的形式分别存入不同参数，当对某一个标准图框中内容进行操作例如标注尺寸或写入字符注释等，取出这个参数，使得本图框中字体标注等大小附和一定比例。如果在一个电子文档中只有一个标准图框就没有必要了。不过词典还有别的很多用处，可以存取多个字符串进行数据传递。

cwmfj · 发表于 2008-12-27 21:23:58

谁有具体的词典可使用的程序，发来学学了

wzg356 · 发表于 2014-10-19 15:47:22

后来才发现

账号		自动登录	找回密码
密码			立即注册

[LISP函数]：利用词典存取比例因子

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

相关帖子