SRL Archive - General

How do I translate between the SCAR color code, and the equivalent HEX code(generally used in html)? or does a connection not exist?

var
  r, g, b: Integer;
  
const
  HexStr = '0123456789ABCDEF';
  
function ToHex(b: Byte): string;
begin
  Result := HexStr[Floor(b / 16)] + HexStr[b mod 16];
end;
  
begin
  ColorToRGB(11439723, r, g, b);
  WriteLn('Hex = ' + ToHex(r) + ToHex(g) + ToHex(b));
end.

Freddy, I'd compare you to :norris: when it comes to coding ^^

More like :norris:..

Edited. Thanks.

D:< Stole.

Thanks Freddy.