如何从读取中提取数据-

aleksa32 · 发表于 2022-7-6 07:27:25

你好

我想知道如何从读取行命令中读取。

更具体地说，我有一个带有坐标和高度、空格分隔的TXT文件，我希望将整行（或其中的一部分）作为非字符串读取。

爆炸：
...阅读行->“97451586.021 4869451.235 268.256”。。。
我不知道如何提取引号之间的数据

谢谢

ReMark · 发表于 2022-7-6 07:34:26

一旦数据被读取，你将如何处理？

aleksa32 · 发表于 2022-7-6 07:39:27

我只是在想这个。

现在，让我们只说，我希望他们在图纸中作为点。
我该怎么办？

ReMark · 发表于 2022-7-6 07:45:25

您可以使用自定义的lisp程序，如Lee Mac的Point Manager。

http://lee-mac.com/ptmanager.html

aleksa32 · 发表于 2022-7-6 07:46:05

谢谢你，伙计！

Lee Mac · 发表于 2022-7-6 07:51:54

不客气，aleksa，很高兴能帮上忙

对于空格分隔的数据，您还可以使用以下“快捷方式”来解释数据：

copy

(read (strcat "(" <your data> ")"))

aleksa32 · 发表于 2022-7-6 07:59:12

甚至更好。
我其实是在找这样的东西！

谢谢大家！

marko_ribar · 发表于 2022-7-6 08:01:37

而且

copy


(setq str "123.123 456.456 789.789")
(setq Xcoord (substr str 1 (vl-string-position (ascii " ") str)))
(setq Ycoord (substr str (+ (vl-string-position (ascii " ") str) 2) (- (vl-string-position (ascii " ") str nil T) (vl-string-position (ascii " ") str))))
(setq Zcoord (substr str (+ (vl-string-position (ascii " ") str nil T) 2) (- (strlen str) (vl-string-position (ascii " ") str nil T) 1)))
(setq point (list (read Xcoord) (read Ycoord) (read Zcoord)))

aleksa32 · 发表于 2022-7-6 08:04:37

E Marko，hvala ti！

Bas sad gledam u Help-u taj SUBSTR。Joši ponajbolje rešenje。

marko_ribar · 发表于 2022-7-6 08:09:26

Nema na cemu，Aleksa。。。Inace ako imas zareze u stringu，samo promeni（ascii“”）u（ascii“”，“”。。。Iname zarez je cest分隔符kod CSV fajla（C-逗号分隔）koji je cesto u upotrebi pri koriscenju transfera podataka ACAD EXCEL。。。

Puno pozdrava i nema na cemu，M.R。

[编程交流] 如何从读取中提取数据-

发表回复

精选推荐