---

Hallo, ich schon wieder.
Folgende Frage, ich möchte ein Layout verschieben. Mit Bordmitteln funktioniert das mit einem Rechtsklick auf den Layout-Reiter, und dann kann ich die Funktion "Verschieben oder Kopieren" verwenden.
Bei dem Befehl LAYOUT habe ich keine Option zum verschieben:

Befehl: LAYOUT
Layout-Option eingeben
[Kopieren/Löschen/Neu/Vorlage/Umbenennen/SIchals/SEtzen/?] <SEtzen>:

Um das Verschieben in eine LISP-Funktion einzubauen würde mir ein Command-Befehl völlig hinreichen, aber den kenne ich leider nicht (oder ich sehe den Wald vor lauter Bäumen nicht).

Weiß einer von Euch weiter?

------------------
viele Grüße

Jörn
http://www.bosse-engineering.com

Kordinaten einlesen Youtube

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

---

Es gibt vla-put-taborder, damit kommst du weiter (einen Command kenne ich auch nicht dafür)

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

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

---

Hallo Sebastian,
Volltreffer, Dein Tip hat mich sofort weitergebracht.
Mit folgender Funktion wird ein Layout ans Ende verschoben:

Code:

---

(defun JB_Layouts:TabOrder:End (LayoutName / )
  (vlax-put(vla-item(vlax-get(vla-get-activedocument (vlax-get-acad-object))
                      'Layouts)LayoutName)
    'TabOrder
    (- (vlax-get(vlax-get(vla-get-activedocument(vlax-get-acad-object))'Layouts)
        'Count) 1))
  )

---

------------------
viele Grüße

Jörn
http://www.bosse-engineering.com

Kordinaten einlesen Youtube

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