---

Hallo an Alle,
vorab ich habe wenig Ahnung von Lisp, etwas mehr von VBA und im ACAD kenn ich mich ganz gut aus. Nun möchte ich, dass bei einer Doppelklickaktion auf einem Block mit Attributen zwei verschiedene Befehle ausgeführt werden. Bei einem normalen Block mit Attributen soll der normale Attributbearbeitungsbefehl ausgeführt werden, Wenn der Block „HermannsBezeichnung“(siehe unten) enthält soll mein VBA-Befehl ausgeführt werden.

Dazu habe ich folgende Lisp Routine geschrieben:

(defun c:Blockdoppelklick ()
  (setq satz Nil
satz (ssget "_I" '((0 . "INSERT") (-3 ("HermannsBezeichnung"))))
  )
  (if (= satz NIL)
    (command "_eattedit")
    (command "-vbarun" "D:/Lisp/VBA/Eineu.dvb!Ändern.BearbEi2")
  )
)

Funktioniert soweit einwandfrei, aber mit einem großen Nachteil. Bei einem normalem Block wird zwar _eattedit aufgerufen, aber ohne das angeklickte Attribut. Das heißt es geht das Fensterchen auf mit dem richtigen Block aber einfach mit dem obersten Attribut und nicht mit dem angeklickten. Hat jemand ne Idee wie man das in den Griff kriegen könnte?
Vielen Dank.
Theo37

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

---

Hallo,
dann solltest du dich mal mit Reactoren beschäftigen
vlr-mouse-reactor
vlr-beginDoubleClick
...

den Blocknamen erhälts du mit
(vla-get-name (vlax-ename->vla-object (car (entsel "\nBlock wählen: "))))

Mir ist zwar net klar was deine dvb-Datei macht und was du da genau machen willst aber vllt. hilft es ja schon.
mfg heiko

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

---

Hallo,

wie schon geschrieben kenn ich mich in Lisp fast gar nicht aus.
Mit den reactor kann ich nichts anfangen. Sorry.
Aber nochmal zur Erklärunng was ich machen wollte.
Man kan unter "Benutzeroberfläche anpassen" Befehle für Doppelklickaktionen vergeben. Dort wollte ich meinen Lispbefehl reinschreiben. dieser soll dann verzweigen, entweder zum alten Befehl oder zu dem Neuen. Das funktioniert auch bis dahin. Nur das Attribut bleibt beim alten Befehl nicht ausgewählt.
Danke für deine Antwort.
Gruß, Theo37

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

---

Wo soll "HermannsBezeichnung" enthalten sein? Als Attributswert? Attributstag? Text in der Blockdefinition?

Grüße

Martin

------------------
You seem (in my (humble) opinion (which doesn't mean much)) to be (or possibly could be) more of a Lisp programmer (but I could be (and probably am) wrong).

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

---

Hallo,

"HermannsBezeichnung" steht in den erweiterten Daten (XDaten) ich benutze das um die Blöcke unabhängig vom Blocknamen zu erkennen.

Gruß, Theo37

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