Legendenfarben in RGB

Gespeichert von Gast am
im Forum ArcView 3.x classic
Hallo,

ich habe zu einer Karte eine Legendendatei (.avl). Ich kann die Karte damit prima darstellen. Um die Karte außerhalb der ESRI-Welt darstellen zu können, würde ich die Legendenfarben aber gerne in RGB-Farben übersetzen. Ist das möglich? Gibt es dafür vielleicht ein Tool?

Viele Grüße
Holger

Gespeichert von Maxilla am Do., 12.10.2006 - 08:44

Permalink
Hallo Holger, hiermit kannst du die RGB-Werte der Legende auslesen (Vordergrundfarbe).
Gruß, Mx.

theView = av.GetActiveDoc 'Aktives View
theThm = theView.GetActiveThemes.Get(0) '1. aktives F- oder GTheme
theLeg = theThm.GetLegend
theSymLst = theLeg.GetSymbols
theRGBs = "R G B"+nl
for each aSym in theSymLst
theCol = aSym.GetColor
theRGBLst = theCol.GetRGBList
for each aVal in theRGBLst
theRGBs = theRGBs+aVal.AsString+" "
end
theRGBs = theRGBs+nl
end

MsgBox.Report(theRGBs,theThm.GetName)

Gespeichert von Gast am Do., 12.10.2006 - 09:54

Permalink
Hallo Maxilla,

das ist ja mal ein Service hier! Vielen Dank für das Skript.

Viele Grüße
Holger