---

hallo,

habe mir ein tool gezogen, das den bemaßungslayer einschaltet.
problem folgende meldung kommt nach dem start des programmes:

Fehler: no function definition: VLR-COMMAND-REACTOR

hat jemand einen tip, da ich oft zwischen bemaßungs- und zeichnungslayer umschalten muß.

lisp-programm:
(defun pre_lay (reatyp befname / );Wenn Bem gestartet wird
  (cond
    ((wcmatch (car befname) "DIM*")
    (setq *oldlay* (getvar "CLAYER"))
    (setvar "CLAYER" "0");Anstatt der 0 den Layer einsetzen, der zum Bemassen genutzt werden soll
    )
    )
  )
(defun after_lay (reatyp befname / );Wenn Bem beendet wird
  (cond
    ((and
      (wcmatch (car befname) "DIM*")
      *oldlay*
      )
    (setvar "CLAYER" *oldlay*)
    (setq *oldlay* nil)
    )
    )
  )
(defun reaload ();Initialisierung des Reactors
  (if (not *DEFUN_DIMLAYER*)
    (progn
      (setq *DEFUN_DIMLAYER*
            (VLR-Command-Reactor "*DEFUN_DIMLAYER*"
              '((:vlr-commandEnded . after_lay)
                (:vlr-commandwillstart . pre_lay)
                )
              )
            )
      (princ "\nLayerschalter Bemassung aktiviert")
      )
    )
  )
(reaload)
(princ "\n(defun - Lisp over night!")
(princ "\nHolger Brischke")
(princ "\nhttp://www.defun.de --- mailto:kontakt@defun.de")
(princ "\nLayerschaltung beim Bemaßen aktiviert.")

danke
ZEC

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

---

Hi Zec,
solltest Du nicht zuerst einmal den Autor des Programms; ziemlich leicht zu identifizieren in diesem Fall; fragen was das Problem sein könnte?
Aber kleiner Tip:
bau mal an den ANFANG des Lisp-Codes ein:

Code:

---

(vl-load-com)

---

ein...

------------------
Ciao,
Marc

[Diese Nachricht wurde von marc.scherer am 18. Okt. 2005 editiert.]

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

---

danke problem gelöst

mfg
ZEC

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