diff --git a/components/mbColorLib/PalUtils.pas b/components/mbColorLib/PalUtils.pas index d518507ce..b8536b0cb 100644 --- a/components/mbColorLib/PalUtils.pas +++ b/components/mbColorLib/PalUtils.pas @@ -99,7 +99,7 @@ begin ColorToHSL(c, hslH, hslS, hslL); ColorToHSV(c, hsvH, hsvS, hsvV); - h := AnsiReplaceText(fmt, '%hex', '#' + ColorToHex(c)); + h := AnsiReplaceText(fmt, '%hex', ColorToHex(c)); h := AnsiReplaceText(h, '%cieL', IntToStr(Round(GetCIElValue(c)))); h := AnsiReplaceText(h, '%cieA', IntToStr(Round(GetCIEaValue(c)))); h := AnsiReplaceText(h, '%cieB', IntToStr(Round(GetCIEbValue(c))));