[Back to DELPHI SWAG index]  [Back to Main SWAG index]  [Original]

--------------------------------------------------------------------------------
In Delphi, color is often represented using the TColor object. In HTML
documents, color is usually represented using a 6 character hex string.
Following function will convert TColor type color values to hex strings:

function
  GetColorHexStr( Color : TColor )
    : string;
begin
  Result :=
    IntToHex( GetRValue( Color ), 2 ) +
    IntToHex( GetGValue( Color ), 2 ) +
    IntToHex( GetBValue( Color ), 2 );
end;

[Back to DELPHI SWAG index]  [Back to Main SWAG index]  [Original]