项目升级到Delphi 2010总结（2）

6，引用AnsiStrings单元

如果你有必要使用 AnsiLowerCase AnsiCompareStr之类的函数，一定要引用AnsiStrings单元。

如果你不引用该单元，即便编译不报错，你实际上是用的还是Unicode版本的函数，会有隐式的转化。不信你打开参数自动完成，看看IDE提示给你的类型是什么？天啊AnsiLowerCase参数竟然还是String，而不是AnsiString。看来Delphi2010太迫切的要抛弃Ansi字符串了，以至于你不引用AnsiStrings单元，所有Ansixxxx函数实际上还是Unicode版本。

 

7，AnsiCopy AnsiPos AnsiDelete

不要用AnsiCopy AnsiPos AnsiDelete，因为Copy Pos Delete三个函数已经有了For Ansi的重载。

 

8，把Char转化为小写用什么？ 

答案：试试看Character单元的新函数 ToUpper ToLower。以前我都是用System里面的UpCase函数，现在依然可用不过却找不到LowCase DownCase之类的函数，困扰我好久好久。索性全使用Character单元提供的新函数吧。

 

9，编译期警告：[DCC Warning] Unit1.pas(31): W1057 Implicit string cast from 'AnsiString' to 'string'

如果你的代码中包含了两种字符串（Unicode、Ansi）之间进行隐式转化的时候就会出现该提示。

如下代码就会触发该警告：

 

var
  Unicode:String;
  Ansi:AnsiString;
begin
  Ansi:='test..';
  Unicode:=Ansi;

 

把旧版本的Delphi项目升级到2010，我通常都是借助编译警告来快速寻找需要改动的部分。通常你可以把赋值双方都声明为String(默认影射到UnicodeString)，就可以避免该警告。但如果你确定必须在此处保留Ansi并进行转化的时候，建议你显式的转化他们（例如：Unicode:=String(Ansi);），这样可以避免该警告，方便你在升级过程中继续寻找其他需要修改的地方。

 

10，Readln Writeln 写入文件时候要注意

如果你传给Writeln一个AnsiString，那么它也会在文件中写入AnsiString，那么你读取得时候就必须传给Readln一个AnsiString的类型，否则就是乱码。例如旧工程的配置文件是Ansi的，而你已经把相关读取配置的代码升级为支持Unicode，那么运行工程前你首先要用记事本之类的工具把配置文件另存为成Unicode编码。当然你还要注意跳过Unicode文件头的两个字节FE FF。

 

11，别再用String来操作二进制数据了

一定要记住String只是字符串，不要把它当作缓冲区、内存流使用。我的项目中，有很多地方是使用字符串来处理二进制数据，导致在本次升级中颇为费脑。如果当时用TBytes或TStream就好了。

反面教材：

 

var
  Int1,Int2,Int3,Int4:Integer;
  Buf:String;
begin
  SetLength(Buf,12);
  Move(Int1,Buf[1],SizeOf(Integer));
  Move(Int1,Buf[5],SizeOf(Integer));
  Move(Int1,Buf[9],SizeOf(Integer));
  Buf:=Buf+'前面有3个Integer。';

 

12，还是PChar

注意在2010中是这样的：

PChar= Pointer to a WideChar array;

PAnsiChar = Pointer to a AnsiChar array;

如果你还像是在Delphi 7中那样：PChar(AnsiString)那后果过是很严重的。