[SOLVED] RGB To Hex

[Mike.Cornflake]

Quick question.  I'm using TFPColor as defined in FPImage.  In order to get a RGB value as 6 char hex, I'm currently doing

Code: [Select]

IntToHex(AStyle.Font.Color.red, 2)+IntToHex(AStyle.Font.Color.green, 2)+IntToHex(AStyle.Font.Color.blue, 2)
Which, while works,  is a little unpleasant on the eye.  Anyone know of any helper routines tucked away somewhere that can this more concisely?

[Mike.Cornflake]

Solved.

Found the following in the very same library I'm coding in...

FPUtils.pas

function FPColorToRGBHexString(AColor: TFPColor): string;