请问delphi怎么把gbk编码转换为utf编码 ？
请问delphi怎么把gbk编码转换为utf编码 ？
日期：2016-04-29 15:51:29 人气：1
procedure TForm1.Button1Click(Sender: TObject);
var
strGBK: AnsiString;
strUTF8: AnsiString;
strUTF16: WideString;
begin
StrGBK := #$B2#$E2#$CA#$D4;//'测试'
ShowMessage(strGBK);
SetLength(strUTF16, Length(strGBK));