Convert TColor values to hex strings

Problem/Question/Abstract:

How to convert TColor values to hex strings

Answer:

HexStr := Format('#%.2x%.2x%.2x;', [GetRValue(MyColor), GetGValue(MyColor),
  GetBValue(MyColor)]);