delphi7与XE的变量与函数的改变

跟往常一样拿着delphi7老程序放在delphi XE中编译发现一些问题总结

1.Pchar类型报错问题

[dcc32 Error]XXX.pas(1299): E2010 Incompatible types: 'PAnsiChar' and 'PWideChar'。

Delphi中有PChar，PWideChar，PAnsiChar三种形式在。在Delphi2010之前Pchar类型默认是PAnsiChar，在Delphi2010之后Pchar类型默认是PWidechar。声明类型要具体指定是PAnsiChar还是PWideChar了。

2.ReadPricessMemory和WriteProcessMemory等一些api函数参数报错问题

[dcc32 Error]XXX.pas(724): E2033 Types of actual and formal var parameters must be identical

在 Delphi Xe中 ReadProcessMemory 和 WriteProcessMemory等一些api的最后一个参数由原来的 var lpNumberOfBytesRead: DWORD 变为了一个指针按他的提示是 type void@

function WriteProcessMemory(hProcess: THandle; const lpBaseAddress: Pointer; lpBuffer: Pointer;nSize: SIZE_T; var lpNumberOfBytesWritten: SIZE_T): BOOL; stdcall;  

function ReadProcessMemory(hProcess: THandle; const lpBaseAddress: Pointer; lpBuffer: Pointer;nSize: SIZE_T; var lpNumberOfBytesRead: SIZE_T): BOOL; stdcall; 

第一个参数不能是 THandle无类型指针，THandle仍然是 Cardinal无符号整型或者THandle类型;第三个参数是个指针类型需要用@取变量地，而最后一个参数必须为THandle类型，使用 Cardinal无符号整型在delphi XE会报错。

3.StrPas函数报错问题

[dcc32 Error] uXHPub.pas(732): E2251 Ambiguous overloaded call to 'StrPas'

用Pchar函数替换StrPas函数即可。