delphi - 迁移到 Delphi 2009 - 无效类型转换错误

Question

我正在将 GraphicEx 项目转换为 Delphi 2009。

我在单元 Scanf_c.pas 中转换以下过程时遇到问题.这是问题所在:

  With TscRec(FType) do begin

FType为整数，TscRec定义为:

  TscRec = packed record  // Has size of an integer
      Case byte of
        0: ( Typ : byte; Size : char; Flags : word;);
        1: ( SizeType : word; iFlags : smallInt;);
      end;

似乎这段代码在 delphi 2007 中运行良好，但我在 Delphi 2009 中编译它时遇到问题。编译器错误是“Invalid Typecase”。问题是由于将整数 FType 类型转换为记录 TScRec 造成的。

这里有人用 Delphi 2009 有同样的问题并有解决方案吗。

谢谢

Answer 1

“char”现在是一个 2 字节的数据类型。如果将声明更改为“ansichar”会怎样？ (这相当于 Delphi <= 2007 中的“char”)。