README.md

Description

Converts a TColor to a HTML Hex value

More Info

Inp: Tcolor

Nothing special...

A string containing the html color

Submitted On
By	Bart Meijer
Level	Beginner
User Rating	3.9 (27 globes from 7 users)
Compatibility	Delphi 5, Delphi 4, Pre Delphi 4
Category	Internet/ HTML
World	Delphi
Archive File

API Declarations

Who cares?

Source Code

function ColorToHex(Inp: TColor): String;
var
  tmp: Longint;
begin
  tmp:= ColorToRGB(inp);
  Result:= '#' + IntToHex(GetRValue(tmp),2) + IntToHex(GetGValue(tmp),2) + IntToHex(GetBValue(tmp),2);
end;