---

Hallo,

wenn ich versuche, einigen Polylinien eine TrueColor zuzuweisen, erhalte ich bei einer Polyline, welche einen Bogen enthölt die Fehlermeldung:

Laufzeitfehler '-2145386467 (8020001d)':
Ungültiger ADSRX-Name

Das TrueColor Objekt wird mit folgenden Zeilen erzeugt:

Public Function farbeErzeugen(r&, g&, b&) As AcadAcCmColor
  Dim farbe As AcadAcCmColor 'Farbe deklarieren
  Set farbe = GetInterfaceObject("AutoCAD.AcCmColor.16") 'inititalisieren
  farbe.SetRGB r, g, b  'Farbwert setzen
 
  Set farbeErzeugen = farbe
End Function

und mit folgender Zeile zugewiesen:
fpolySSet(polyIndex).TrueColor = farbeErzeugen(255,0,0))

Bei "normalen" Polylinien funktioniert es einwandfrei, nur bei besagtem Polygon mit dem Kreisbogen gibt es Probleme.

Woran liegt das und wie behebe ich das Problem?

Grüße,

Jaquimo

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

---

Kommando zurück! Asche auf mein Haupt, wer nicht programmieren kann, sollte es lassen. Ich habe den Fehler entdeckt und er hatte goarnix mit dem Polygon zu tun.

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

---

Hatte mich auch schon gewundert, was das mit RX zu tun haben könnte;-)

Gruss, Axel Strube-zettler

------------------
(defun - Lisp over night - AutoLisp-Programmierung für AutoCad - Da weiß man, wann man's hat
Meine AutoLisp-Seiten Mein Angriff auf dein Zwerchfell Mein Lexikon der Fotografie Mein gereimtes Gesülze

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