| | |  | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
|
Autor
|
Thema: Eigenschaftsfenster > Geometrie > Position X (1273 mal gelesen)
|
Bernd P
Ehrenmitglied V.I.P. h.c.
cook-general
   Beiträge: 3358
Registriert: 07.06.2001 W10-64bit, AMD Ryzen 7 3700X,32GB RAM, Sapphire Pulse Radeon RX 570 8G G5, Canon TX-3000 MFP, Maus Cherry MW4500, Sub:Infrastructure Design Suite, Office 365
|
erstellt am: 08. Jul. 2013 15:07  <-- editieren / zitieren -->   Unities abgeben:          
Servus, über das Eigenschaftsfenster > Geometrie > Position X kann man z.B. den Einfügepunkt von mehreren Texten ändern.
Kann man diesen Befehl auch ohne Eigenschaftsfenster aufrufen? ------------------
<----- Bitte Systeminfo eintragen, warum siehst du hier. "Warum Einfach es geht auch kompliziert". Schöne Grüsse aus der Steiermark Bernd P. Sport ist Mord
Rekorde: Scalelist>11727, Fehler>34365, Layerfilter>XXXX Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cadwomen
Ehrenmitglied V.I.P. h.c.
Mädchen für fast alles
Beiträge: 2966
Registriert: 26.08.2002 ACAD R11 - 2022
(Plant3D)
AVIS
ACAD LT 2013- 2021
ZWCAD 2015 Versuch "nun ja"
[s]History P3D 2012/(13) SP und Hotfix([/s]<P>
Windows 10 / 64 Bit
Xeon CPU 3.5GHz
16GB Ram
NVIDIA Quadro P2000
3x Dell TV100 88P Monitore
|
erstellt am: 08. Jul. 2013 15:15 <-- editieren / zitieren --> Unities abgeben: Nur für Bernd P 
Hy über :ändern , Eigenschaften nicht wirklich, da steht dann nur
Eigenschaft eingeben [Farbe/ERhebung/LAyer/LTYp/LTFaktor/LStärke/Objekthöhe/TRansparenz/Material/Beschriftung] zur verfügung
gibt aber jede Menge Lisp Teile zum manipulieren von Texten cu cw ------------------
Also ich finde Unities gut ... und andere sicher auch
------------------------------------------------
cadwomen™
Plant ist wie Öl suchen, je tiefer man bohrt desto mehr kommt ans Tageslicht Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Bernd P
Ehrenmitglied V.I.P. h.c.
cook-general
Beiträge: 3358
Registriert: 07.06.2001 W10-64bit, AMD Ryzen 7 3700X,32GB RAM, Sapphire Pulse Radeon RX 570 8G G5, Canon TX-3000 MFP, Maus Cherry MW4500, Sub:Infrastructure Design Suite, Office 365
|
erstellt am: 08. Jul. 2013 16:07 <-- editieren / zitieren --> Unities abgeben:
Servus "zum manipulieren von Texten" Farbe, Ausrichtung usw. schon nur scheint xyz etwas komplexer zu sein.... ------------------
<----- Bitte Systeminfo eintragen, warum siehst du hier. "Warum Einfach es geht auch kompliziert". Schöne Grüsse aus der Steiermark Bernd P. Sport ist Mord
Rekorde: Scalelist>11727, Fehler>34365, Layerfilter>XXXX Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
spider_dd
Mitglied
Beiträge: 1111
Registriert: 27.11.2003 Win 10Pro
Intel(R) Core(TM) i7-7700
NVIDIA Quadro P1000
ACAD, Civil-3D 2018
|
erstellt am: 09. Jul. 2013 08:29 <-- editieren / zitieren --> Unities abgeben: Nur für Bernd P
Zitat:
Original erstellt von Bernd P:
"zum manipulieren von Texten" Farbe, Ausrichtung usw. schon nur scheint xyz etwas komplexer zu sein....
Nö. Quick and dirty ohne Fehlerroutine für den schnellen Eigengebrauch z. B. so: Code:
; modix.lsp
; aendern x-koordinate
;
(defun c:modix(/ neu_x tl anz x ct ctl alt_10 neu_10)
(setq neu_x (getreal "Neue X-Koordinate eingeben: ")) (princ "Texte wählen") (setq tl (ssget '((0 . "TEXT"))))
(setq anz (sslength tl) x 0)
(while (< x anz)
(setq ct (ssname tl x))
(setq ctl (entget ct))
(setq alt_10 (cdr (assoc 10 ctl)))
(setq neu_10 (cons neu_x (cdr alt_10)))
(setq ctl (subst (cons 10 neu_10) (assoc 10 ctl) ctl))
(entmod ctl)
(entupd ct)
(setq x (1+ x))
)
)
HTH Gruß
Thomas Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
| Anzeige.:
Anzeige: (Infos zum Werbeplatz >>)
 |
Foren auf CAD.de (alle Foren)
| 
