TVarData x86和x64 Delphi之间的差异

Question

我在x64中找不到关于TVarData的任何解释.帮助中有一个页面,但似乎x64中的TVarData和x86中的TVarData不同.实际上我正在尝试为x64目标编译DEHL.但它在这一行上说"无效的类型转换":(来源是TVarData)

Big := TBigCardinalVarData(Source).BigCardinalPtr^;

TBigCardinalVarData在这里:

TBigCardinalVarData = packed record
  VType: TVarType;
  Reserved1, Reserved2, Reserved3: Word;
  BigCardinalPtr: PBigCardinal;
  Reserved4: LongWord;
end;

它在x86中编译,但它拒绝在x64中编译.我认为问题出在Word和LongWord变量中.但我还想不通.

Answer 1

问题是packed record声明,X64中的打包记录类型成为记录类型,因此您必须从声明中的"打包记录"中删除"打包",而是使用ALIGN指令.

{$ALIGN 8}
TBigCardinalVarData = record
  VType: TVarType;
  Reserved1, Reserved2, Reserved3: Word;
  BigCardinalPtr: PBigCardinal;
  Reserved4: LongWord;
end;

有关更多信息,请阅读这些条目

• Delphi Compiler Changes for XE2
• 将32位Delphi应用程序转换为64位Windows