안녕하세요..
문자열 '02685969150286690316' 이렇게 20자리 문자인데
이 스트링을 10진수로 변환 => 16진수로 변환
=> 배열 AKeyArray : array[0..9] Of Char 에 넣어야 하는데
먼저 IntToStr이용해 10진수로 변환하고 다음 IntToHex함수로
바꾼다음 배열에 넣을려고 하는데요.
10진수로 값을 저장되는 Integer, Int64 형식도 값이 넘 커서
안되더군요..
이럴때는 어떻게 해야하는지요?
조금 봤는데 그냥 Format함수를 쓰시면 될것 같던데요..
function IntToHex(Value: Integer; Digits: Integer): string;
begin
FmtStr(Result, '%.*x', [Digits, Value]);
end;
암튼 함수 원형은 저렇더군요 약간만 수정하시면 쓸수 있을거 같아서..