hromadné přepsání textu
Vytištěno z: CAD Fórum
Kategorie: CAD - obecně
Název fóra: Obecně o oboru CAD (CAx a BIM)
Popis fóra: Obecné otázky okolo CAx a BIM technologií, formáty, normy, správa, licence, sítě, CAD nástroje
URL: https://www.cadforum.cz/forum/forum_posts.asp?TID=1278
Datum vytištění: 20.srp.2026 v 20:17
Téma: hromadné přepsání textu
Odeslal: maxu
Předmět: hromadné přepsání textu
Datum odeslání: 23.srp.2005 v 10:13
|
Nemáte tip na hromadné přepsání textu(např.číselné hodnoty o určitou další hodnotu 0.38+0,1),ale v řadu stovek hodnot.
Diky M. |
Odpovědi:
Odeslal: Keberdle Václav
Datum odeslání: 23.srp.2005 v 10:20
|
Pomocí najít a nahradit.. Přes regulérní výrazy avšak Nápověda mlčí .( |
Odeslal: Vladimír Michl
Datum odeslání: 23.srp.2005 v 10:26
|
tu další hodnotu myslíte jako numerický součet? na to by byl potřeba nějaký LISP nebo VBA script pokud jde jen o přidání nebo úpravu textu (bez výpočtů), pomůže vám vyhledání/nahrazení využívající regulární výrazy (omezeně ve verzi 2006 nebo pomocí naší utility http://www.cadforum.cz/cadforum/default.asp?tab=2&T=srxText - srxText ) ------------- Vladimír Michl (moderátor) ARKANCE CZ - https://arkance.world - arkance.world (podpora viz emea.support.arkance.world) |
Odeslal: Honza
Datum odeslání: 23.srp.2005 v 11:17
|
Občas používám tento jednoducký lisp: ;; pricte k vybranemu cislu konstantu konst ;; a presune cislo do hladiny "0-znema" ;;JGa4/10/2002 (defun c:prc () (setq konst 0.06) (setq lay "0-zmena") (setq ENAME (entget (car (entsel)))) (setq cislo (cdr (assoc 1 ename))) ;;ziska text z vybraneho textu (setq cislo (atof cislo)) ;;prevede text na cislo (setq cislo (+ cislo konst)) ;; pricte konstantu (setq cislo (rtos cislo 2)) ;;prevede cislo na text ; (SETQ CISLO (STRCAT "%%U" CISLO) ) ; PODTRHNE TEXT (setq ENAME (subst (cons 1 cislo)(assoc 1 ENAME) ENAME)) ;;nahradi stavajici text novym cislem ; (setq ENAME (subst (cons 8 lay)(assoc 8 ENAME) ENAME)) ;;zmeni vrstvu (print cislo) &nbs p; &nbs p; ;;zobrazi vysledne cislo na obrazovce (entmod ENAME) &nb sp; &nb sp; ;;zregeneruje entitu ve vykrese (princ) ); END je třeba upravovat  , ale funguje  JGa |
Odeslal: PepaR
Datum odeslání: 24.srp.2005 v 11:44
|
nasel jsme mozná takový oběcnější nástroj pro nahrazení textu ve více DWG souborech.... Ovšem matematické operace neumí :)
http://www.cadforum.cz/forum/uploads/PepaR/2005-08-24_114423_Replace_Text_In_Dwg.zip - 2005-08-24_114423_Replace_Text_In_Dwg.zip
|