如何将unicode转换为中文汉字？

Question

如何将unicode转换为中文汉字？
比如现在知道“中文”的unicode码为：“4E2D 6587”，怎么转换成中文汉字呢，delphi中有什么API或者可以提供那些方法可以实现转换？

Answer 1

unicode在delphi中用widestring声明，gb2312直接用string就可以，做一个赋值操作就可以完成转换
例如：
var
  ws: WideString;
  ns: String;
  p: PChar;
  s: String;
  i: Integer;
begin
  SetLength(ws, 2)
  ws[1]:=WideChar($4E2D);
  ws[2]:=WideChar($6587);
  ns:=ws;//完成转换
//显示编码
  p:=@ns[1];
  form i:=0 to length(ns)-1 do s:=s+IntToHex(Byte(p[i]), 2);
  ShowMessage(s);
end;  

Answer 2

form i:=0 to length(ns)-1 do s:=s+IntToHex(Byte(p[i]), 2);是4吧？！