Scalabium Software

SMExport advertising
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
 
ABA Database Convert
SMMsg suite
SMExport suite
Metafile Convert
DBLoad
Viewer for MS Outlook Messages
Paradox ActiveX
dBase Viewer
SMImport suite
Excel Reader (dll)
 
 


Contact to webmaster

 

Borland Software Code Gear Scalabium Delphi tips

Copyright© 1998-2019, Scalabium Software. All rights reserved.
webmaster@scalabium.com

SMReport Autogenerated