CAD tip # 12968:

Otázka CAD
% platforma kategorie

Jak hromadně nahradit font ve stylech písma?

Chcete-li hromadně nahradit použitý font (soubor písma) ve všech stylech písma v DWG výkresu AutoCADu, použijte následující LISP funkci - zkopírujte ji na příkazový řádek AutoCADu nebo ji uložte do .LSP souboru a ten načtěte pomocí APLČTI - a poté zadejte příkaz REFONT.

Upravte seznam nahrazovaných písem a název nového fontu - všimněte si odlišného formátu pro písma .SHX a .TTF.

Chcete-li provést změnu hromadně ve více výkresech, použijte např. ScriptPro.

;Replace fonts in text styles
(vl-load-com)
(defun C:ReFont (/ adoc tstyle)
  (vla-startundomark (setq adoc (vla-get-activedocument (vlax-get-acad-object))))
  (vlax-for tstyle (vla-get-textstyles adoc)
    (if (wcmatch (vla-get-fontfile tstyle) "complex.shx,monotxt.shx,txt*.shx") ; any of these, replace with:
      (vla-put-fontfile tstyle "simplex.shx") ; new SHX case
      ;(vla-put-fontfile tstyle (strcat (getenv "windir") "\\Fonts\\Arial.ttf")) ; new TTF case
    )
  )
  (vla-endundomark adoc)
  (vla-regen adoc acallviewports)
  (princ)
)

ACAD

* CAD

2.6.2021 1528×

bod font formát lisp text výkres

Připomínky Přeposlat

Zaslat obchodní dotaz

Související CAD produkty:

AutoCAD

Ceny - CAD eShop:

AutoCAD

platí pro: AutoCAD ·

CADstudio

Vybíráme: Reset uživatelských nastavení AutoCADu - sekundární instalátor.

Zprávy: ARKANCE – nové jméno, stejný tým

Zpět Všechny další tipy

Jak zvětšit přesnost údajů zobrazených ve Fusion 360? « | » V dialogu Možnosti ve Vault klientu 2022 mi chybí tlačítka OK a Zrušit.

Pomohl vám tento tip? Provoz služby CADForum.cz podpoříte i nákupem produktů Autodesk u provozovatele tohoto serveru a Platinum partnera Autodesku, firmy Arkance Systems.
Můžete si také přidat odkaz na vaše stránky:

CAD: OS: Kateg:
Text:	FAQ

Tipy a triky prosím využívejte na vlastní zodpovědnost.
Provozovatel (Arkance Systems CZ s.r.o.) nenese odpovědnost za případné potíže vzniklé v souvislosti s použitím kteréhokoliv z uvedených tipů.
Pro plné zvládnutí dané aplikace doporučujeme absolvování některého z nabízených CAD školení.
Další publikování obsahu je dovoleno jen se souhlasem autora.

	CAD Fórum - tipy, triky, podpora, pomoc a rady pro AutoCAD, LT, Inventor, Revit, Map, Civil 3D, 3ds Max, Fusion 360, Forma a další Autodesk aplikace (support firmy Arkance Systems). Viz O portálu.	Arkance Systems CZ/SK s.r.o. (CAD Studio) - Autodesk Platinum Partner & Training Center & Services Partner	KONTAKT: webmaster.cz@arkance-systems.com tel. +420 910 970 111
	Copyright © 2024 \| Web reklama na tomto serveru \| Ochrana soukromí, podmínky

CZ \| SK \| EN \| DE
Přihlášení
či registrace
	právě nás čte: 4927