[原创]数据类型是"SYM",怎么转化为字符型

xiatian · 发表于 2008-4-22 08:07

大家好我要从一个文件里读数据,然后标注在cad中.

我的文件是"L2 2000 3000",我要标注的是第一个数,可在cad里L2的数据类型显示是"Command: (type xh)
SYM",没法标注,那位大虾能帮忙给解决一下.先谢谢了.

读文件是我用的是(setq datfile(getfiled "展点原始数据：" "F:" "txt" 2));查找文件路径
(setq ff(open datfile "r"))
(setq data(read (strcat "(" (read-line ff) ")" )))

中间加了个括号,就不用数行加了.

Andyhon · 发表于 2008-4-22 08:54

(setq xh (car data)
xh (vl-princ-to-string xh)
)

xiatian · 发表于 2008-4-22 15:15

Andyhon你好,您说的函数确实能解决这个问题.可我用的是r14啊,好象不支持这个函数.这是visio lisp的函数吧.我用用了老出错..先谢谢您了..这个问题能解决吗??

ZZXXQQ · 发表于 2008-4-22 15:41

如果前面只有两个字母，可以将

(setq data(read (strcat "(" (read-line ff) ")" )))

改成

(setq d1 (substr data 1 2))

(setq data (read (strcat "(" (substr data 4) ")")))

(setq data (cons d1 data))

etom999 · 发表于 2008-4-23 13:28

记得有个SToC函数...

Andyhon · 发表于 2008-4-23 15:19

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