---

Hallo zusammen

Es geht mir um dynamische Blöcke mit Sichtbarkeitsparameter.
Schon wider der sch... Sichtbarkeitsparameter 

(setq a (vlax-ename->vla-object (car (entsel))))
(setq b (vlax-variant-value(vla-getdynamicblockproperties a)))

(setq array (vlax-safearray->list b))
Bei normalen Blöcken kommt die Fehlermeldung.

ActiveX-Server hat einen Fehler zurückgegeben:
Ungültiger Index

Habe mir jetzt mal mit
(vlax-safearray-get-u-bound b 1)
geholfen. Sollte eigentlich die Indexlänge ausgeben so weit ich das nach der Hilfe interpretiere. Wenn kleiner 0 ist der safearray lehr und kann nicht umgeformt werden.

Sehe ich das richtig?

Danke für die Mühe und Gruss

Steff

Wenn ich keinen dynamischen Block wähle, erzeugt das schreiben in eine Liste einen error.
Ich weiss nicht wie ich den Savearray prüfen könnte ob der in eine Liste geschriben werden kann.
Die Blöcke nach "*U" aussortieren ist nicht das gelbe vom Ei, da Blöcke welche schon abgesetzt sind und durch den Blockeditor einen Sichtbarkeitsparameter bekommen, welcher nicht umgestellt wird noch keinen "*U" eintrag haben.

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

---

na nimm doch vlax-safearray-get-u-bound... und ne schleife...

Code:

---

  (setq i (vlax-safearray-get-l-bound b 1))
  (while (<= i (vlax-safearray-get-u-bound b 1))
  (setq c (vlax-safearray-get-element b i))
;mach was...
  (print (strcat (vla-get-PropertyName c) " --> "))
  (princ (vlax-variant-value (vla-get-value c)))
  (setq i (1+ i))
  )

---

------------------
Mfg Heiko

Elefantenjagd in Afrika
"... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..."

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

---

oder mit (vl-catch-all-apply ... arbeiten

Grüsse, Henning

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

  http://www.voxelman.de

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

---

Danke Heiko
Hat mir sehr geholfen. Hab noch so meine Probleme mit Arrays  
Gruss

@Henning
vl-catch-all-apply

Die Idee hatte ich auch, aber irgendwie tue ich mich noch recht schwer damitt, werde es aber auch mal ausprobieren.

Danke auch

[Diese Nachricht wurde von Steff179 am 05. Mai. 2011 editiert.]

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

---

dann wäre noch vlax-property-available-p .... zum Testen bzw.
vlax-method-applicable-p

ob die Methode Eigenschaft überhauptvorhanden ist .. und dann erst weiter

------------------
      - 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

---

Bei einem normalen Block
(vlax-method-applicable-p vla-obj 'getdynamicblockproperties) = T
Bei einem Dynamischen Block
(vlax-method-applicable-p vla-obj 'getdynamicblockproperties) = T
Was mir nicht viel weiterhilft und in meinen Augen total schräg ist. Da der ja keine Properties haben sollte. Kein Plan....
Oder habe ich die Idee falsch verstanden?

Aber mit der Methode von Heiko gibts ja auch keine errors, was die abfrage eigentlich erübrigt, mich aber trozdem nicht in ruhe lässt.

[Diese Nachricht wurde von Steff179 am 05. Mai. 2011 editiert.]

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

---

versuch mal das

Code:

---

(vla-get-IsDynamicBlock (vlax-ename->vla-object (car (entsel))))

---

------------------
Mfg Heiko

Elefantenjagd in Afrika
"... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..."

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

---

omg so einfach kanns sein 
wenn man weiss nach wass man suchen muss findet man es auch in der hilfe  

Besten Dank

[Diese Nachricht wurde von Steff179 am 05. Mai. 2011 editiert.]

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