Delphi2007之前的API繁简转函数在Delphi2009版本出现后不能用,原因在于之前版本的String默认为AnsiString,而Delphi2007之后的String默认为WideString,同样,PChar指针也就为PAnsiString,所以调用WindowsAPI函数如:MultiByteToWideChar会出现编译出错,原因是类型不对,也不能强制转换,以下是本人修改的网上流行的繁简转函数,测试通过,并完全正常使用!