---

Hallo Gemeinde,

leider kommt es bei uns immer wieder vor, daß aus irgendwelchen Gründen sämtliche Toolboxen verschwinden. Zwar sind alle Menüs noch intakt (geprüft über CUI) aber der aktuelle Arbeitsbereich enthält keinerlei Toolboxeinträge mehr (daher ist auch keiner mehr zu sehen). Aber der "normale" Benitzer tut sich mit dem zurückladen über Arbeitsbereich/Profil usw... leider etwas schwer.

Nun habe ich mich schon an einem Lisp-Tool versucht, um
a) den (noch intakten) Arbeitsbereich "MW" unter "SICHER" zu sichern
b) den gesicherten "SICHER" wieder zurückzuladen und unter "MW" wieder abzuspeichern

Das geht vom Prinzip, aber beim sichern mit (command "_WSSAVE" "SICHER") sollte vorher geprüft werden, ob ebendieser Arbeitsbereich existiert oder nicht, um ein situationsabhängiges Kommando absetzen zu können.

Kennt jemand einen Trick, um festzustelllen, ob es einen Arbeitsbereich "SICHER" bereits gibt?

Bin über jede Info dankbar
Gruß Helmut

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

---

Hi,

die einfachste Variante, die mir dazu einfällt: Versuch' ihn einfach aktuell zu setzen.
Wenn der Arbeitsbereich noch fehlt, kommt eine Fehlermeldung, die man abfangen und entsprechend reagieren kann:

Code:

---

(if
  (vl-catch-all-error-p
    (vl-catch-all-apply
      'setvar
      (list "WSCURRENT" "sicher")
    )
  )
  (command "_wssave" "sicher")
)

---

Gruß
CADchup

------------------
CADmaro.de

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