Scalabium Software
Knowledge for your independence'.
Home Delphi and C++Builder tips

#44: How can I convert a color value into in HTML format?

If you want to create a HTML-file, you must define a tag for font color or backgroubd color. But you can't insert a Delphi's TColor value - you must convert the color into RGB-format. In own SMExport suite I use the next
function:

function GetHTMLColor(cl: TColor; IsBackColor: Boolean): string;
var rgbColor: TColorRef;
begin
  if IsBackColor then
    Result := 'bg'
  else
    Result := '';
  rgbColor := ColorToRGB(cl);
  Result := Result + 'color="#' + Format('%.2x%.2x%.2x',
                                            [GetRValue(rgbColor),
                                             GetGValue(rgbColor),
                                             GetBValue(rgbColor)]) + '"';
end;

Published: November 22, 1999

See also

	Viewer for TNEF-files (winmail.dat)
	SMExport suite
	Clarion Viewer
	Viewer for MS Outlook Messages
	MAPIMail
	SMMsg suite
	Paradox Password Recovery
	ABA Spreadsheet Convert
	Clarion to Text converter
	Paradox ActiveX

Contact to webmaster