Q&A

  • Ascill값을 hex값으로 어떻게 변환하나요.. 알려주세요

Ascil(아스키) = '?<#$'이값을 Hex값으로 변환할려고 하는데..

저는 도저히 못하겠습니다..

알려주세요...

감사합니다.
2  COMMENTS
  • Profile
    미친개 2003.04.24 19:51

    function HexDisplay( sStr : String ) : String;
    var
      sTmp,sHex : String;
      i : integer;
    begin
      sTmp := '';
      for i:=1 to Length( sStr ) do
      begin
        sHex := Format( '%x', [Byte(sStr[i])] );
        if Length( sHex ) = 1 then sTmp := sTmp + 'x0' + sHex
        else sTmp := sTmp + 'x' + sHex;
      end;
      Result := sTmp;
    end;

    즐코하세요
  • Profile
    이승민 2003.04.24 04:05

    우선 ?<#$'이값들은 문자값이죠
    그럼 우선 수치로 바꿔야 겠죠

    Byte('?') 로 하면 숫자값으로 나옵니다. 이걸 다시 Hex 로 바꾸면 되겠죠
    IntToHex(Byte('?'), 2) 로 하면 문자열로 출력합니다.
    IntToHex 함수는 Help에서 찾아보시면 알껍니다.

    그럼 즐코되세요.