설명은 따로 없습니다. 아래 코드를 참고하세요. const HexChars: array[0..15] of Char = ('0', '1', '2', '3', '4', '5', '6', '7', '8', '9', 'a', 'b', 'c', 'd', 'e', 'f'); function IntToHex(Int: Int64; IntSize: Byte): string; var n: Byte; begin Result := ''; for n := 0 to IntSize - 1 do begin Result := HexChars[Int and $F] + Result; Int := Int shr $4; end; end; function HexToInt(const Value: string): LongWord; const He..