---

Hallo,
habe mich nachdem ich die Vorteile von Feldern in Attributen entdeckt habe, an einer Lisp-Routine versucht, die ein Feld als Attribut (in einem Flaechenstempel) mit der Flaeche einer Polylinie verknuepft. Hintergrund ist der, dass ich extrem viele dieser Flaechenstempel immer wieder updaten muss,da sich die Flaechen staendig aendern. Das haendische Updaten des Attributs oder das Updaten eines simplen Attributs mittels einer eigenen Lisproutine ist sehr zeitaufwendig, deshalb jetzt der Versuch die Flaechenstempel assosiativ zu machen.
Leider bin ich bei dem Lisp-code schon bei der Uebergabe der Objekt-ID in den Attributwert gescheitert. Bei der Zusammenfassung mittels "strcase" kommt folgende Fehlermeldung:
; error: bad argument type: symbolp 2122412616

anbei der codeschnipsel bis zu diesem Punkt:
(defun C:upda (/ tat EN1 tax OBj1)
(setq EN1 (car (entsel "\nPick a Polyline: ")))
(vl-load-com)
(setq EN1 (vlax-ename->vla-object EN1))
(setq Obj1 (vla-get-ObjectID EN1))
(setq str (vl-symbol-name Obj1))
(setq tax (strcat "%<\\AcObjProp Object(%<\\_ObjId " str ">%).Area \\f \"%.3f\">%"))

Hat jemand eine Idee wo der Fehler liegt bzw. wie mans besser machen kann evtl. sogar ne Idee wo man eine Lisp-Routine fuer diesen Zweck finden kann ?
Bin leider nur ein ziemlicher Gelegenheitsprogrammierer ohne richtige Grundlagen...
Gruesse,
Lothar Hennig

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

---

Hallo Lothar,

Willkommen im Forum! Meine Idee, wo der Fehler liegen könnte: Es wird Dir bereits mitgeteilt! Die "Art" der Fehlermeldung ist informativer, als man glaubt. Eine Meldung mit der Fehlerart - hier symbolp -  und der verursachenden Quelle - hier die Zahlenkette - ist durchaus hilfreich.

"symbolp" prüft, ob ein Ausdruck ein Symbol ist - also im weitesten Sinne keine Zahl ("numberp"), sondern eher sowas wie Text. Das erleichtert Dir die Fehlersuche. Wie man es "besser" machen kann, verraten Dir sicher die Profis - bin ebenfalls 'nur' Gelegenheitlispler. Viel Glück!
Frederik

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

---

Hi,

Paulchen hat recht. Die Funktion vl-symbol-name wandelt einen Symbolnamen in einen String um. Nur übergibst du kein Symbol sondern eine ObjectID.
Verwende anstelle von vl-symbol-name besser VL-PRINC-TO-STRING Dieser Funktion ist es egal, was da ankommt, die gibt sogar einen String zurück wenn sie schon einen bekommen hat.

Gruß
CADchup

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

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

---

Danke paulchen und cadchup,
mit hilfe von VL-PRINC-TO-STRING hab ich die routine schnell fertigbekommen. funktioniert praechtig!
Muss nur noch die fehlerbehandlung integrieren.
wenn interesse besteht kann ich die routine auch posten.
danke nochmeinmal,
lothar hennig

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