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

	DBISAM Viewer
	Paradox Viewer
	Excel Web-stream
	Mail parser (ActiveX)
	DBLoad
	ExcelFile Viewer
	ABA Spreadsheet Convert
	SMReport
	ABA Picture Convert
	ABA Database Convert

Contact to webmaster