lazarus代码在32Bit/64Bit系统间的判断方法

猫工

2. {$IFNDEF FPC}
3. type
4.    PtrInt = integer;
5.    PtrUInt = cardinal;
6. {$ENDIF}

复制代码

zeus-chu

用 {$IFDEF CPU32} 和 {$IFDEF CPU64} 就行了。

也可以用 SizeOf(Pointer) 判断。

在 x64 的 Windows 上也有 IsWow64Process() 这个 API。