---

Hallo zusammen, ich möchte alle Ansichtsfenster (variable Anzahl bis max. 4 AF) mit einem Knopfdruck auf Grenzen zoomen. Kann mir da jemand helfen? Gruß Mario

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

---

(defun C:ZOOMALLAF(/ AW NR)
  (if(and(setq AW(ssget "_X" (list'(0 . "VIEWPORT")(cons 410 (getvar "CTAB")))))
        (>(sslength AW)1)
    )
    (progn
      (command "_.mspace")   
      (setq NR 1)
      (repeat (1-(sslength AW))
        (setvar "CVPORT" (setq NR(1+ NR)))
        (command "_zoom" "_e")
      )
      (command "_.pspace")   
    )
  )
)

------------------
  - Thomas -
"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."

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

---

Zitat:

---

Original erstellt von CADmium:
(defun C:ZOOMALLAF ...

---

haben wir schon Karneval?

Grüsse, Henning

------------------
VoxelManufaktur Computer-Dienstleistungen für Architekten und Ingenieure

  http://www.voxelman.de

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

---

Hi Cadmium, toll und super im Layoutbereich zu gebrauchen! Aber (reusper, hüstel hüstel, ähm, naja, Wie soll ich sagen? verlegen zu Boden schauen und mit der Sandale im Sand schierend) Ich habe vergessen mitzuteilen, dass ich die Ansichtsfenster im Modellbereich meinte. Meine Schuld! Ich möchte hiermit abermals in aller Form an Dein ausgeprägtes Helfersyndrom appellieren :-) Gruß Mario

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

---

Wir helfen gerne...

Allerdings musst du uns zuerst helfen:

Was in aller Welts Namen sind AF, welche sich im Modellbereich befinden ?

Wir haben sowas bis jetzt weder gehört noch gesehen... - erklär mal...

------------------
Grüsse

Thomas

[Diese Nachricht wurde von tunnelbauer am 17. Jul. 2007 editiert.]

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

---

'NTach Tunnelbauer, aus meiner Sicht sind das Ansichtsfenster, oder nicht? Eines von oben, eines seitlich und noch ne ISO.
Erstellt habe ich mir das in meiner *.dwt wie folgt:
Modellbereich - Ansicht - Ansichtsfenster - 4 Ansichtsfenster. Anschließend habe ich die Ansichten entsprechend auf "von oben", "von vorn" etc. eingestellt.
Wenn ich nun ne Weile gezeichnet habe ist es immer recht hilfreich mal wieder alle Ansichten auf den Status Quo zu setzen.
Gruß Mario

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

---

(defun C:ZOOMALLAF(/ AW NR) 
    (progn
      (setvar "CTAB" "Model")
      (setq NR 1)
      (repeat 5)
        (setvar "CVPORT" (setq NR(1+ NR)))
        (command "_zoom" "_e")
      )
    )
  )
)

------------------
  - Thomas -
"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."

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

---

Andere Möglichkeit:

Einmal einstellen, speichern, wiederherstellen... (lässt sich dann auch auf ein Buttonmakro legen...)

Befehl dazu: _-vports

------------------
Grüsse

Thomas

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

---

Danke Euch für Eure Ideen, das mit den _vports werde ich mir gleich mal zu Gemüte führen. Klingt interessant.

@Cadmium: Dein Programm hat nicht geklappt, war aber der perfekte Ansatz für mein Problem (hast wahrscheinlich schon das Mittagessen aus der Kanitne geschnuppert und da wird man schusselig, nor?) :-)

Ich kann nicht programmieren, aber aus Deinen Bausteinchen und Axels Tuorial zur Repeat-Schleife habe ich Deine Zeilen zum laufen bekommen. (Habe die Wiederholung mal auf 25 gesetzt, da CVPORT höhere Werte als 4 (bei 4 Ansichtsfenstern) zurück gegeben hat. Ich vermute mal, der zählt jedes neue Fenster und behält alte Fensternummern im Speicher.

Danke nochmal!
Mario

(defun C:ZAAF(/ AW NR) 
  (setvar "CTAB" "Model")
  (setq NR 1)
  (repeat 25
    (progn   
      (setvar "CVPORT" (setq NR(1+ NR)))
      (command "_zoom" "_e")
    )
  ) 
)

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