Color zu Hex

[dominikkv]

bei DelphiWorks gibts ne function dafür

Delphi-Quellcode:

function dwColorToHTMLColor(const Color: TColor): String;
var
   iR, iG, iB: Byte;
begin
   iR:= GetRValue(Color);
   iG:= GetGValue(Color);
   iB:= GetBValue(Color);
   result:= Format('#%.2x%.2x%.2x', [iR, iG, iB]);
end;