Hallo zusammen!
irgendwie stehe ich hier auf dem Schlau und hoffe das mich davon jemand runter holt.
ich möchte den XRecord Daten ein Element hinzufügen und zwar so das ich mit vla-getxrecorddata die bestehenden Daten auslese in die meine Daten an die bestehenden Anhänge und die Liste wieder zurückschreibe.
Also mit:
Code:
(setq meinBlock (list(cons 340 (vlax-ename->vla-object (car(entsel))))))(vla-setxrecorddata
Dic-AddXRecord
(vlax-safearray-fill
(vlax-make-safearray vlax-vbinteger (cons 1 (length meinBlock)))
(mapcar (function car) meinBlock)
)
(vlax-safearray-fill
(vlax-make-safearray vlax-vbvariant (cons 1 (length meinBlock)))
(mapcar (function cdr) meinBlock)
)
)
kann ich die bestehenden Daten einwandfrei ersetzen. Wenn ich aber mit:
Code:
(vla-getxrecorddata Dic-AddXRecord 'code 'value)(setq AlteXRecord-Data
(mapcar (function cons)
(vlax-safearray->list code)
(mapcar (function vlax-variant-value)
(vlax-safearray->list value)
)
)
)
die alten Daten abhole kann ich diese nicht wie oben ersetzen also statt meinBlock AlteXRecord-Data geschweige die alten und neuen daten zusammen bringen.
Ich hoffe mir kann da jemand hefen. Vielen Dank!
------------------
Gruß Wolfgang
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP