Hot News:

Mit Unterstützung durch:

  Foren auf CAD.de (alle Foren)
  Rund um AutoCAD
  Text innerhalb von Blöcken - Lisp anpassen

Antwort erstellen  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
  
Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte
Autor Thema:  Text innerhalb von Blöcken - Lisp anpassen (1043 mal gelesen)
SNOOP_69
Mitglied
Konstrukteur - Innenausbau


Sehen Sie sich das Profil von SNOOP_69 an!   Senden Sie eine Private Message an SNOOP_69  Schreiben Sie einen Gästebucheintrag für SNOOP_69

Beiträge: 539
Registriert: 25.01.2006

Hardware:
- Lenovo-W540
Software:
- Win10 Pro 64bit
- Autocad 2018-2023 (Vollversion+LT)
- BricsCad
- DraftSight
- SolidWorks 2017-2022
- SWOOD 2019
- MasterCAM 2018-2022

erstellt am: 22. Jun. 2015 10:38    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hallo,

kann mir jemand von den LISP-Spezialisten vielleicht einen Gefallen tun?!?
Kann das nachfolgende "Fix-all-Text"-Tool so angepasst werden, dass es bei den Texten auch die Textausrichtung (oben-links / zentriert / etc.) ändert?
Muss da einfach noch eine "Alignment-Zeile" mit eingefügt werden?

Code:
Auszug aus dem Tool FixallText.lsp von LeeMac:

Code:
    (setq lst
       '(
            (
                "AcDbBlockReference" ;; Block Attributes
                (layer "0")
                (color acbylayer)
                (stylename "Standard")
                (scalefactor 1.0)
                (height 1.0)
            )
            (
                "AcDbText" ;; Text
                (layer "0")
                (color acbylayer)
                (stylename "Standard")
                (scalefactor 1.0)
                (height 1.0)
            )
            (
                "AcDbMText" ;; MText
                (layer "0")
                (color acbylayer)
                (stylename "Standard")
                (height 1.0)
            )
            (
                "AcDbAttributeDefinition" ;; AttDefs
                (layer "0")
                (color acbylayer)
                (stylename "Standard")
                (scalefactor 1.0)
                (height 1.0)
            )
        )
    )

[Diese Nachricht wurde von SNOOP_69 am 22. Jun. 2015 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

cadffm
Moderator
良い精神




Sehen Sie sich das Profil von cadffm an!   Senden Sie eine Private Message an cadffm  Schreiben Sie einen Gästebucheintrag für cadffm

Beiträge: 21533
Registriert: 03.06.2002

System: F1
und Google

erstellt am: 22. Jun. 2015 10:43    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für SNOOP_69 10 Unities + Antwort hilfreich

Ich schau mir das Tool nicht extra an, aber wenn diese "Funktion" nicht vorgesehen ist,
dann gehe ich fest davon aus das es nicht so einfach geht: Es sei denn du möchtest die
Position des Textbasispunktes behalten, was aber ja sehr unwahrscheinlich ist.

------------------
CAD on demand GmbH - Beratung und Programmierung rund um AutoCAD

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

SNOOP_69
Mitglied
Konstrukteur - Innenausbau


Sehen Sie sich das Profil von SNOOP_69 an!   Senden Sie eine Private Message an SNOOP_69  Schreiben Sie einen Gästebucheintrag für SNOOP_69

Beiträge: 539
Registriert: 25.01.2006

Hardware:
- Lenovo-W540
Software:
- Win10 Pro 64bit
- Autocad 2018-2023 (Vollversion+LT)
- BricsCad
- DraftSight
- SolidWorks 2017-2022
- SWOOD 2019
- MasterCAM 2018-2022

erstellt am: 22. Jun. 2015 10:45    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

doch, der einfügepunkt könnte so bleiben...alles andere wäre zu aufwendig, das verstehe ich schon!

es reicht leider nicht diese zeile einzufügen...

Code:
(alignment acAlignmentMiddleCenter)

[Diese Nachricht wurde von SNOOP_69 am 22. Jun. 2015 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

cadffm
Moderator
良い精神




Sehen Sie sich das Profil von cadffm an!   Senden Sie eine Private Message an cadffm  Schreiben Sie einen Gästebucheintrag für cadffm

Beiträge: 21533
Registriert: 03.06.2002

System: F1
und Google

erstellt am: 22. Jun. 2015 13:04    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für SNOOP_69 10 Unities + Antwort hilfreich

Jain,
nimmt der das überhaupt an? Normal möchte er doch einen Ganzzahlenwert haben, 8 12 oder was eben beliebt.

Von der grundsätzlichen Aufgabe her sollte das auch ausreichen(interne MTextformatierungen ausgenommen, denn das ist ja was anderes).

Schwierig(er) ist es dann die Position anzugeben, da kann ich dir leider nicht spontan mal eine Zeile Posten die noch zum fremden Code passt.

------------------
CAD on demand GmbH - Beratung und Programmierung rund um AutoCAD

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag
Antwort erstellen


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!

Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2023 CAD.de | Impressum | Datenschutz