德尔福 – {$IFOPT A4} 是什么功能选项？

本文共计333个文字，预计阅读时间需要2分钟。

在Delphi 2009（或更早版本）中，要检查代码中的Align编译选项，可以使用IFOPT指令。虽然IFOPT指令主要用于纯交换机，但在某些情况下也可能适用于其他目的。例如，尝试使用以下方式设置对齐：

{ $IF Align=4 }

但这种方法可能无法正常工作。如果您找不到有效的常量或定义，可以尝试以下方法：

{ $IF Defined(Align) }

这里使用了Defined函数来检查是否已定义了名为Align的符号。如果Align已被定义，那么这个条件将为真，您可以在代码块中包含相应的指令。

请注意，确保您的编译器或项目设置中已经定义了Align变量，或者您需要正确地设置它以满足您的需求。

在Delphi 2009(或更早版本)中,如何检查代码中的“Align”编译选项？

IFOPT指令似乎只适用于纯交换机({$IFOPT A4}无法编译).

我找不到等效的常数或这样的定义({$IF Align = 4}或者等等)

您可以通过使用已知的打包规则定义记录并使用SizeOf进行检查来完成此操作.在Delphi 2009中测试：

type TTestRec = record A: Byte; B: Int64; end; {$IF SIZEOF(TTestRec) = 9} {$MESSAGE HINT '$A1'} {$ELSEIF SIZEOF(TTestRec) = 10} {$MESSAGE HINT '$A2'} {$ELSEIF SIZEOF(TTestRec) = 12} {$MESSAGE HINT '$A4'} {$ELSEIF SIZEOF(TTestRec) = 16} {$MESSAGE HINT '$A8'} {$ELSE} {$MESSAGE HINT 'Unknown alignment'} {$IFEND}