用LISP去读取*.txt或*.mdb文件里的数据？

spshchen · 发表于 2005-1-18 15:12:00

用LISP去读取*.txt或*.mdb文件里的数据？
找了很多地方都没有找到，我是想通过LISP去设置部分图元的参数，这部分的参数希望保存起来，每次直接用函数去调用，我想这个论坛应该是有的，但是我不知道在哪里，希望各位大哥能给个例子，或给个链接。

meflying · 发表于 2005-1-18 16:31:00

读这两种文件是截然不同的两个过程，读TXT很简单： open打开，write-line写，read-line读，close关闭 MDB文件看看下面的文章： http://www.mjtd.com/a2/list.asp?id=349

spshchen · 发表于 2005-1-19 12:25:00

谢谢大哥我已经能打开Txt文件了，而且能读取数据了，下面是如何把这些数字保存成变量，以便后面程序调用？最好能给我个例子好ma ?

我实在是不懂呀，大家不要笑我，还有版主，你们这里出版的书我在这边的书店没有找到，不知道到哪里购买？

meflying · 发表于 2005-1-19 13:05:00

(setq str (read-line f));str就保存了读取的一行数据，是字符串类型

spshchen · 发表于 2005-1-19 20:30:00

(defun C:test(/ ss i wid a2)
(setq a2 "ANT") ;ANT是层的名称。
(setq ss (ssget "x" '((0 . "LINE")(8 . a2))))；这句我不知道哪里错了？
(setq i 0 wid 3)
(repeat (sslength ss)
(command "_.pedit" (ssname ss i)"y" "w" wid "")
(setq i (1+ i))
)
(princ)
) 还有个问题是判断线的的类型是用什么命令的？（判断线是普通的还是多义的）不好意思我问的问题都是很简单的，但是我实在是没有办法解决呀。

spshchen · 发表于 2005-1-19 20:36:00

还有问题：从文本读取出来的一行字符串，如何把他分开，

如12 235 ANT 等把他对应的分开为一个一个变量。

meflying · 发表于 2005-1-19 20:50:00

(setq ss (ssget "x" '((0 . "LINE")(8 . a2))))->

(setq ss (ssget "x" (list '(0 . "LINE") (cons 8 a2))))

判断类型，根据其DXF组码的0关键字，具体参考帮助文件中DXF参考部分

6楼的问题，根据不同的内容要使用不同的方法，需要多学习字符串的操作。

以上这些问题是比较简单，而且确实不应该问（第一个除外），这些东西还不懂，说明你基础的东西还没有去学，如果你要自学，最主要的是自己学习，遇到难以突破的，才问问别人，而不是有问题就问，毕竟自学不同于有老师教。你不能要用到什么就学什么，至少你得把基础的东西都学好了，所以建议你，按你有的资料（帮助文件都可以）的顺序，一点一点地看

spshchen · 发表于 2005-1-20 09:22:00

谢谢大哥的指点，因为现在有个东西要赶时间，书一下子也没有找到，想快点解决问题，因为我的应用都是很简单的，有时间我一定好好的看看各个函数。

chen4 · 发表于 2005-1-22 03:58:00

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