---

Isch hätte gern.....

ein "Zeichnung schließen (ohne speichern) und erneut öffnen Button !
- Jetzt wo endlich das Lt-feature mit dem Pulldown für "Zurück" in
die Vollversion übernommen wurde ist es zwar eigentlich nicht mehr
von Nöten, aber dennoch hätte ich sowas gern.

Da ich in Lisp nur innerhalb einer Datei agieren kann wird das wohl
damit nicht funktionieren (lasse mich aber liebend gern belehren).

In VBa dürfte das aber doch möglich sein ...

aktuelle Datei...

1. "merken"

2. schließen (ohne speichern)

3. erneut öffnen

Befehl aufŽs KnöpfŽchen und der Sebastian hat ein tolles Geburtstagsgeschenk !

-wer hilft ?

vielen dank an ALLE die sich an dem Thread beteiligen.

------------------
Gruß Sebastian
Der Feind des Guten ist das Bessere.

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

---

Hallo Sebastian,

wie wäre es mit folgendem Trick?
Du schreibst mit Lisp eine Script-Datei und führts diese aus, z. B.:

(defun C:close_open ( / )
  (setq scr_file (open (strcat (getvar "TEMPPREFIX") "My_script.scr") "w"))
  (if (= (getvar "DBMOD") 0)
    (write-line "_CLOSE" scr_file)
    (write-line "_CLOSE _Y" scr_file)
  )
  (write-line (strcat "_OPEN " (getvar "DWGPREFIX") (getvar "DWGNAME")) scr_file)
  (close scr_file)
  (princ)
)

Dann belegst du einen Button eines Werkzeugkastens mit dem Befehl:
^C^CClose_open;Script "C:/ACAD/TMP/My_script.scr"
(Close_open muß geladen sein und das Script natürlich mit deinen Pfad)

So müßte es klappen.

Schönes Wochenende
Helmut

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

---

Danke für den "Trick" - ich werde die VBA-Variante allerdings
vorziehen . - eben so Umwege spart man sich halt im VBA.

------------------
Gruß Sebastian
Die Befehlszeile ist dein Freund...lesen bildet !

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