[Delphi] 델파이 Byte - Hexa 문자열 변환 함수

델파이로 통신 프로그램 개발하다보면 흔하게 사용하는 함수죠. // // Byte로 구성된 문자열을 Hexa 문자열로 변환 // function ValueToHex(const S: AnsiString): AnsiString; var i: Integer; begin SetLength(Result, Length(S)*2); // 문자열 크기를 설정 for i:=0 to Length(S)-1 do begin Result[(i*2)+1]:= HexaChar[Integer(S[i+1]) shr 4]; Result[(i*2)+2]:= HexaChar[Integer(S[i+1]) and $0f]; end; end; // // Hexa 문자열을 Byte로 구성된 문자열로 변환 // function HexToValue(const S: AnsiString) : AnsiString; var i: Integer; begin SetLength(Result, Length(S) div 2); for i:=0 t...

원문링크 : [Delphi] 델파이 Byte - Hexa 문자열 변환 함수