Delphi中使用Include为file-open-dialog添加多选选项报编译错误

System.Include 是Delphi内置的集合操作过程，其第一个参数为var修饰的集合类型形参，要求传入的实参必须是可直接寻址、可写入的内存变量。
你传入的OpenDialogSourceFiles.Options是文件对话框组件的属性而非公开字段：VCL中TOpenDialog的Options属性底层通过getter/setter方法封装读写逻辑，不属于符合var传参要求的可写内存位置，因此编译器会直接抛出参数不匹配错误。
你最初使用的集合并集赋值写法可以正常运行，是因为该逻辑等价于：先通过属性的getter方法读取当前Options的集合值，和[fdoAllowMultiSelect]做并集运算后，再通过属性的setter方法将新值写回，完全符合属性的读写规则。

你可以根据编码场景二选一：

• 方案1：直接使用集合并集赋值（全版本兼容，推荐常规场景使用）
  该写法无版本兼容问题，逻辑直观，是操作组件集合属性的常规写法：

  // 若单元uses区已引入Vcl.Dialogs，可省略前缀直接写fdoAllowMultiSelect
  OpenDialogSourceFiles.Options := OpenDialogSourceFiles.Options + [Vcl.Dialogs.fdoAllowMultiSelect];
  

• 方案2：通过临时变量中转使用Include（适合批量修改集合元素的场景）
  如果需要连续给集合添加多个元素，反复写集合并集赋值会比较冗余，可以先把属性值读到临时变量，用Include修改临时变量后再回写属性：

  var
    DialogOptions: TOpenOptions;
  begin
    DialogOptions := OpenDialogSourceFiles.Options;
    // 可连续调用Include添加多个枚举值
    Include(DialogOptions, fdoAllowMultiSelect);
    Include(DialogOptions, fdoFileMustExist);
    OpenDialogSourceFiles.Options := DialogOptions;
  end;
  

注意：不要尝试直接访问组件内部存储Options的私有字段完成修改，私有字段的实现随VCL版本变动可能调整，会导致代码兼容性问题。

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