把16进制字符串转字符串怎么写算法？
具体的效果是，收到字符串0x00 0x01转换成字符串'0001'
算法怎么写？


[解决办法]

Delphi(Pascal) code

procedure TForm1.Button2Click(Sender: TObject);var        mbuf: array of byte;        mstr: string;        i: integer;begin        mstr := '0x00 0x01';        mstr := StringReplace(mstr,'0x','',[rfReplaceAll]);        mstr := StringReplace(mstr,' ','',[rfReplaceAll]);        SetLength(mbuf,Length(mstr) div 2);        HexToBin(pchar(mstr),pchar(mbuf),Length(mstr) div 2);        for i:=0 to (Length(mstr) div 2)-1 do                showmessage(IntToStr(mbuf[i]));end;