Spuštěn nový vzhled portálu CADfórum.
Již 10.000+ CAD tipů. Přes 117.000 registrovaných u nás, celkem 1.088.000 registrovaných (CZ+EN), přes 54.000 CAD/BIM bloků. Vyzkoušejte nový Inženýrský kalkulátor. Příkazy a proměnné AutoCADu 2026.
Již 10.000+ CAD tipů. Přes 117.000 registrovaných u nás, celkem 1.088.000 registrovaných (CZ+EN), přes 54.000 CAD/BIM bloků. Vyzkoušejte nový Inženýrský kalkulátor. Příkazy a proměnné AutoCADu 2026.
Diskuzní fórum, poradna
?CAD diskuze, rady, výměna zkušeností

Fórum nenahrazuje technický support firmy ARKANCE (CAD Studio) - přímá podpora pro zákazníky funguje na helpdesk.arkance-systems.cz
|
Odpovědět ![]() |
archiv |
Autor | |
Koluch ![]() Zasloužilý člen ![]() Přihlášen: 04.dub.2012 Lokalita: ČR (OS) Používám: AutoCAD 2018 Stav: Offline Bodů: 166 |
![]() Zasláno: 22.čvc.2020 v 07:14 |
Ahoj,
prosím Vás, mám ve výkresu spoustu odkazů s textem, kde je faktor šířky a rozteče nastaveny na 0,7 a chtěl bych to hromadně změnit na 1,0. Lze to nějak hromadně udělat, abych nemusel editovat každý odkaz zvlášť? Děkuji, Lukáš.
|
|
![]() |
|
Vladimír Michl ![]() Profil člena
Odeslat soukromou zprávu
Najít příspěvky člena
Navštívit stránky člena
Přidat do seznamu známých
Moderátor ![]() ![]() Arkance Systems Přihlášen: 09.zář.2004 Lokalita: ČR (JČ) Používám: Implementujeme řešení Autodesk Stav: Offline Bodů: 21866 |
![]() |
Určitě to půjde, minimálně nějakým makrem, ale o jakou entitu a hlavně o jakou vlastnost jde? (nejlépe jejím názvem v okně Vlastnosti)
Nejde jen o šířkový faktor fontu nastavený ve stylu písma?
|
|
![]() |
|
Koluch ![]() Zasloužilý člen ![]() Přihlášen: 04.dub.2012 Lokalita: ČR (OS) Používám: AutoCAD 2018 Stav: Offline Bodů: 166 |
![]() |
Když rozkliknu textové pole a nebo Modkaz a chci editovat text, tak je tam nabídka pro FAKTOR ŠÍŘKY, ROZTEČ... A právě ten faktor šířky a rozteč bych chtěl hromadně upravit. Děkuji, L.
|
|
![]() |
|
masa1 ![]() Profil člena
Odeslat soukromou zprávu
Najít příspěvky člena
Navštívit stránky člena
Přidat do seznamu známých
TOP uživatel ![]() ![]() Přihlášen: 25.led.2006 Lokalita: ČR (PL) Používám: Abaqus, NX, Inventor, AutoCAD 2018 Stav: Offline Bodů: 387 |
![]() |
Zdarvím. Zkusil bych buď: 1. Vytvořit nový styl písma s požadovaným nastavením a požadované texty do něj převedl. 2. Vybrat texty a provést změnu ve vlastnostech. A pokud něco zapomenete, kopírovat vlastnosti.
|
|
Mašek
|
|
![]() |
|
Vladimír Michl ![]() Profil člena
Odeslat soukromou zprávu
Najít příspěvky člena
Navštívit stránky člena
Přidat do seznamu známých
Moderátor ![]() ![]() Arkance Systems Přihlášen: 09.zář.2004 Lokalita: ČR (JČ) Používám: Implementujeme řešení Autodesk Stav: Offline Bodů: 21866 |
![]() |
Aha, ale tenhle faktor šířky není vlastností MOdkazu, ale vlastností jednotlivých vybraných částí toho odstavcového textu. Buď jej tedy změňte ve stylu písma, nebo - pokud je faktor šířky měněn individuálně uvnitř MTextu - odstraňte ony formátovací řídicí znaky (viz Unformat nebo MTextCF v sekci Download).
|
|
![]() |
|
johny ![]() TOP uživatel ![]() Přihlášen: 24.led.2006 Lokalita: ČR (JM) Používám: C3D 2024 Stav: Offline Bodů: 1727 |
![]() |
Snad pomůže. Formátuje to jen celé texty. Testováno zběžně.
Vyžaduje StripMtext v5-0c
;; ACAD 2012+ ;; Requires StripMtext v5-0c ;; Original https://www.theswamp.org/index.php?topic=31584.0 (free registration required) (defun c:MtextsWidth ( / n s i e p) (if (and (or (load "StripMtext v5-0c") (prompt "\nError: This tool requires 'StripMtext v5-0c' routine loaded!")) (setq s (ssget "_:L" '((0 . "MTEXT,MULTILEADER")))) (setq n (getreal "\nSpeficy Mtext Width Factor: ")) (StripMtext s "W") ) (repeat (setq i (sslength s)) (setq e (ssname s (setq i (1- i))) p (if (= "MTEXT" (cdr (assoc 0 (entget e)))) "Contents" "MText/Contents")) (setpropertyvalue e p (strcat "{\\W" (rtos n 2 2) ";" (vl-list->string (vl-remove 123 (vl-remove 125 (vl-string->list (getpropertyvalue e p))))) "}")))) (princ) ) (defun c:MtextsTracking ( / e s i e p) (if (and (or (load "StripMtext v5-0c") (prompt "\nError: This tool requires 'StripMtext v5-0c' routine loaded!")) (setq s (ssget "_:L" '((0 . "MTEXT,MULTILEADER")))) (setq n (getreal "\nSpecify Mtext Tracking: ")) (StripMtext s "T") ) (repeat (setq i (sslength s)) (setq e (ssname s (setq i (1- i))) p (if (= "MTEXT" (cdr (assoc 0 (entget e)))) "Contents" "MText/Contents")) (setpropertyvalue e p (strcat "{\\T" (rtos n 2 2) ";" (vl-list->string (vl-remove 123 (vl-remove 125 (vl-string->list (getpropertyvalue e p))))) "}")))) (princ) ) |
|
![]() |
Pro technickou podporu CAD
kontaktujte Helpdesk
Odpovědět ![]() |
|
Přejít na fórum | Oprávnění fóra ![]() Nemůžete vytvářet nová témata v tomto fóru Nemůžete odpovídat na témata v tomto fóru Nemůžete vymazávat vaše příspěvky v tomto fóru Nemůžete upravovat vaše příspěvky v tomto fóru Nemůžete vytvářet ankety v tomto fóru Nemůžete hlasovat v anketách v tomto fóru |
Stránka byla vygenerována za 0,461 sekund.