Zobrazit plnou verzi příspěvku: Jak v LISPu zjistit vlastnosti textu?

Darq
19.05.2005, 08:59
Nevite nekdo, jak nacist informace o textu ve vykresu? Potreboval bych hlavne jeho obsah a souradnice vlozeni.
Diky za pripadne info
D. 

Seiner
19.05.2005, 09:49
Pro inspiraci kousky kodu z mého prográmku:
(setq sk1 (ssget "X" '((0 . "TEXT") (8 . "CISLAP"))))
(setq m (ssname sk1 i))(setq dz (entget m))(setq cislo (cdr(assoc 1 dz))      bod (trans(cdr(assoc 11 dz))m 1))
- vybere všechny texty v hladině CISLAP a pak v cyklu (není okopírováno) přes všechno vybrané zjišťuje text a bod vložení)