FreePascal报"invalid qualifier"错误但Delphi7可编译，求兼容编译开关

Delphi 7支持一种简写语法：当函数返回动态数组时，可以直接在函数名后加数组下标（如f[0]），等价于先调用函数再取下标（f()[0]）。但FreePascal（FPC）默认不识别这种语法，会抛出“Error: Illegal qualifier”错误。

可以通过以下方式让FPC兼容该语法：

• 命令行编译开关：使用-MDelphi（大小写不敏感）开关编译代码，FPC会启用Delphi兼容语法模式，支持这种简写。
• IDE设置（Lazarus）：在项目的「Compiler Options」中，将「Syntax Mode」设置为「Delphi」，即可开启兼容模式。
• 代码内编译指令：在代码开头添加{$mode Delphi}指令，无需额外编译开关，代码本身就能启用兼容特性。

示例代码（添加编译指令后）：

{$mode Delphi}
procedure Test;
type
  TArray = array of Integer;
  TArrayFunc = function: TArray;
var
 a: TArray;
 f: TArrayFunc;
 i: integer;
begin
 i := f[0]; // FPC中可正常编译
 i := f()[0]; // 兼容D7和FPC的标准写法
end;

内容的提问来源于stack exchange，提问作者malom