---

Hallo,
irgend wie fuktioniert das farbe ändern nicht mehr. Kann das einer nchvollziehen?
(command-s "ändern" (entlast) "" "ei" "f" "f" "RAL CLASSIC" "RAL 6019" "")
die angezeigte Farbe ist immer 185,206,172

------------------
Gruß Wolfgang

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

---

Test.dwg

Hier noch eine Muster DWG

------------------
Gruß Wolfgang

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

---

Hallo Wolfgang,

was gibt denn das Textfenster für eine Rückmeldung, wenn Du den Code durchlaufen lässt?
Da ich mit LT den Code nicht testen kann, habe ich die Befehle per Eingabe nacheinander abgearbeitet und dabei habe ich bei "RAL 6019" das Leerzeichen weggelassen. So hat es bei mir funktioniert.

Gruß
Robert

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

---

Hallo Wolfgang,
das mit dem Command-S habe ich jetzt nicht ausgetestet, aber vielleicht kannst Du ja Alternativ direkt an das TrueColor-Objekt ran, dass müßte in jedem Fall funktionieren:

Code:

---

(defun c:test ( / OBJ OBJLIST RALNAME)
  (setq RALList  '("RAL CLASSIC" "RAL 6019"))
  (if (setq obj(car(entsel "\nObjekt picken:")))
    (progn
      (setq vla-obj(vlax-ename->vla-object obj)
    vla-TrueColor (vla-get-TrueColor vla-obj))
      (vla-SetColorBookColor vla-TrueColor (car RALList)
            (cadr RALList))
      (vla-put-TrueColor vla-obj vla-TrueColor))))

---

------------------
viele Grüße

Jörn
http://www.bosse-engineering.com

Liniensignaturen Youtube

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

---

Hallo Jörn,
kannst du das mal in der Datei testen die ich anghengen habe? Bei mir gibt es da keine Veränderung.

------------------
Gruß Wolfgang

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

---

Hallo Wolfgang,
das verstehe ich gar nicht, mit meinen Testobjekte funktioniert es, mach mal eine neue Zeichnung und probier es.

Was ich in Deiner Zeichnung festgestllt habe: wenn ich per Farbauswahldialog "RAL 6019" auswählen, dann wird auch nur der zugehörige RGB-Wert angezeigt, aber keine Farbbuch.

Es muss irgendwie an der Zeichnung liegen ist mein erster Schnellschuß, vielleicht findest Du noch was raus, ich habe jetzt nur noch wenig Zeit.

------------------
viele Grüße

Jörn
http://www.bosse-engineering.com

Liniensignaturen Youtube

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

---

Ja herausgefunden habe ich das alle Dateien die mit der Vorlage "Aec Modell (D A CH Ctb).dwt" (unverändert) erstellt wurden weisen diesen Fehler auf. Bei z.B "Aec Modell (D A CH Ctb) mm.dwt" funktioniert alles wie gewohnt. Komisch nur das neu erstellte Objekte die Änderung nicht annehmen. 

------------------
Gruß Wolfgang

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