本文整理自网络,侵删。
今天研究了一下delphi2010的unicode,发现一大堆的转换问题,建议大家老项目还是别转换到2010版本上,否则出问题都不知道在哪里。新项目可以直接使用delphi2010工作。
在delphi2010中定义一个变量str,无论这个变量定义为string 还是 ansistring,pos和ansipos函数都将该变量str当做unicodestring类型处理,大家可要小心了。
procedure TForm2.Button1Click(Sender: TObject);
var
str: AnsiString;
begin
str := '中华人民共和国';
ShowMessage('长度:' + IntToStr(Length(str)));
ShowMessage('位置:' + IntToStr(AnsiPos('民', str))); // 换为pos还是返回4
end;
在delphi2010中fillchar中的char还是按字节来做的,可不是widechar类型,大家可要小心了
procedure TForm2.Button2Click(Sender: TObject);
var
Buf: array [0 .. 4] of Char;//这里delphi2010认为cha是2个字节
begin
FillChar(Buf, Length(Buf), #0);//如果使用Length(Buf)来填充,那就少填写了一些内容,大家可以设置断点来查看。正确应该用SizeOf(Buf)
ShowMessage('SizeOf:' + IntToStr(SizeOf(Buf)));
ShowMessage('Length:' + IntToStr(Length(Buf)));
end;
总之,感觉delphi2010还没有多细节还没做好,char应该是2个字节,有的函数还是还认为char是1个字节(例如fillchar)。如果项目要升级到2010,大家要注意很多地方
相关阅读 >>
Delphi richedit控件中插入图片bmp(bmp,文件),gif(文件)
Delphi {$pointermath on} 方便指针操作的编译指令
手动创建和部署一个classes.dex 查看更多关于 classes.dex 的文章 文件
更多相关阅读请进入《Delphi》频道 >>