delphi 2009 简体 转 繁体 （请看清我的要求啊）
Delphi(Pascal) code:
//定义如下
tagIDCardData = packed record
Name: array[0..31] of AnsiChar;
Sex: array[0..3] of AnsiChar;
Nation: array[0..5] of AnsiChar;
Born: array[0..17] of AnsiChar;
Address: array[0..71] of AnsiChar;
IDCardNo: array[0..37] of AnsiChar;
GrantDept: array[0..31] of AnsiChar;
UserLifeBegin: array[0..17] of AnsiChar;
UserLifeEnd: array[0..17] of AnsiChar;
Reserved: array[0..37] of AnsiChar;
PhotoFileName: array[0..254] of AnsiChar;
end;
IDCardData = tagIDCardData;
TCardMsg = ^IDCardData;
//我是这样子引用的：
var
MyCardData:TCardMsg;
begin
lblName.Caption := MyCardData.Name;
end;
//结果显示有乱码？
//我试过用简体转繁体的函数，但是转过来还是一样的有乱码。（乱码为'?'号）
只有从身份证里读出来的资料（姓名，地址等为乱码，界面上的一些其他的显示内容不是乱码）。
我用的简体转繁体函数为：（这个函数不起作用）
Delphi(Pascal) code:
Function GBCht2Chs(GBStr: String): AnsiString; {GBK繁体转简体}
Var
len:integer;
pGBCHTChar: PChar;
pGBCHSChar: PChar;
Begin
pGBCHTChar := PChar(GBStr);
Len := SizeOf(pGBCHTChar);
GetMem(pGBCHSChar, Len + 1);
ZeroMemory(pGBCHSChar, Len + 1);
//GB
相关问答：
接收到的文本内容是ucs2编码格式，请问怎样转换成中文
按我的理解，UCS-2是字符集，具体的编码有UTF-8，UTF-16 (LE/BE)等。
如果你用Delphi 2009及以上版本，可以看看TEncoding类。
btw. 你说的转换成中文是啥意� ......
昨晚在Delphi数据库查询中遇到了一个疑惑。代码如下：
procedure TFormSearchAchievement.ComboBoxXYChange(Sender: TObject);
var
XY : string;
begin
XY := comboboxxy.Items[comboboxx ......
返回的内容是如下代码,怎么能渠道2b?
<p class="text1">1a </p>
<p class="text1">2b </p>
<p class="text1">3c </p>
<p cl ......
delphi 6 的可执行程序在VISTA下不能执行，一直在进程中，无法启动，请有见过这种情况的朋友指点一下，如何处理
我指的是delphi编译好的可执行程序，在VISTA下无法执行。可执行程序是很多年前的了，肯定不能再编� ......
