a7daac4f414243 
上面是Big5内码转换去"我是ABC",
我在论坛试了好多方法都弄不到呢,MultiByteToWideString,LcMapString..都试过了,麻烦帮帮忙,我已经试了好几天了..
P/S:我是用DELPHI的

請把試過的code PO上來讓前輩們幫你看看問題在哪

现在我用UnicodeEncode已经成功转换了,
可是我使用UnicodeDecode我要把"我是ABC"转换去a7 da ac 4f 41 42 43就不行了..帮帮忙

function UnicodeDecode(Str:WideString;CodePage:integer):string;
var
Len:integer;
begin
Len:=Length(Str)*2 1; //one for #0
SetLength(Result,Len);
Len:=WideCharToMultiByte(CodePage,0,PWideChar(Str),-1,PChar(Result),Len,nil,nil);
SetLength(Result,Len-1);
end;

procedure TForm1.Button2Click(Sender: TObject);
var
str:string;
a:array[0..100] of char;
mystr:Tstringlist;
i,snum:integer;
begin
memo1.Clear;
str:=edit2.text;
str:=UnicodeDecode(str,950);
memo1.Lines.add(str);
end;