We value your feedback.
Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!
function HexToTColor(sColor: string): TColor; begin // sColor begins with $00 so trim sColor to the last 6 chars if length(sColor) < 6 then sColor := 'FFFFFF' else sColor := rightStr(sColor, 6); Result := RGB(StrToInt('$'+Copy(sColor, 1, 2)), StrToInt('$'+Copy(sColor, 3, 2)), StrToInt('$'+Copy(sColor, 5, 2)) ); end;
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.