Entwickler-Ecke

Sonstiges (Delphi) - HTML Farbe ?


Killmag10 - Di 20.01.04 20:58
Titel: HTML Farbe ?
Hi

Wie kann ich einen Tcolor wert (HEX) in einen HTML Farbwert umwandeln ?

auch clBLACK zb muss umgewandelt werden !

also von $00CCCCCC in #CCCCCC.

weis nehmand rat ?

mfg. Killmag10


KidPaddle - Di 20.01.04 21:32

Die Funktion StringToColor könnte von nutzen sein.

Gruß
KidPaddle


Motzi - Di 20.01.04 22:08

Zuerst mit ColorToRGB in einen RGB-Wert umwandeln, dann kannst du mit GetRValue, GetGValue, GetBValue die RGB-Anteile auslesen und die brauchst du dann nur mehr per IntToHex ins Hex-Format umwandeln und dir deinen String zusammenbasteln...


StefanH - Mi 21.01.04 16:39


Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
function ColorToHTML(Color: TColor): string;
{Autor: StefanH}
var i: integer;
    bgr: string;
begin
i:= ColorToRGB(Color);
bgr:= IntToHex(i,6);
result:= '#' + Copy(bgr,5,2) + Copy(bgr,3,2) + Copy(bgr,1,2);
end;


aufruf über

Delphi-Quelltext
1:
ColorToHTML(clBlack);                    


Stefan


Killmag10 - Do 22.01.04 08:49

Danke Leuts !

genau das ist das was ich brauche. :wink:

mfg. Killmag10