有谁知道 简体和繁体的unicode的对应关系

Question

有谁知道 简体和繁体的unicode的对应关系

Answer 1

你要做什么效果，是不是好多Form要转换成D5的Form呢？呵呵，我帮你提提

Answer 2

window提供了这类的api，
请参阅MSDN的 LCMapString

Answer 3

uses JwaWinNT;function S2T(S: String): String;
begin
  SetLength(Result, Length(S));
  LCMapString(MakeLCID(MakeLangID(LANG_NEUTRAL, SUBLANG_SYS_DEFAULT), SORT_DEFAULT),
    LCMAP_TRADITIONAL_CHINESE,
    @S[1],
    Length(S),
    @Result[1],
    Length(S)
  );
end;procedure Test;
begin
  ShowMessage(S2T('谁')); // 誰
end;// 如果你没有JwaNT这个单元，可以自己写MakeLCID及MakeLang函数
function MAKELANGID(PrimaryLang, SubLang: USHORT): WORD;
begin
  Result := (SubLang shl 10) or PrimaryLang;
end;function MAKELCID(LangId, SortId: WORD): DWORD;
begin
  Result := (DWORD(SortId) shl 16) or DWORD(LangId);
end;