//在delphi2007中通过var wStr: wideString;begin wStr := widechar($4F60); ShowMessage(wstr);end;//在delphi2009中通过var wStr: String;begin wStr := char($4F60); ShowMessage(wstr);end;