很简单的delphi菜鸟问题

Question

想修改TOpenDialog控件以支持多选，请问代码怎么写，这样写为何是错的？
procedure TForm1.Button1Click(Sender: TObject);
begin
  OpenDialog1.Options := ofAllowMultiSelect;  //错误
  if OpenDialog1.Execute then
  begin
    Image1.Bitmap.LoadFromFile(OpenDialog1.FileName);
  end;
end;

Answer 1

OpenDialog1.Options := OpenDialog1.Options + [ofAllowMultiSelect];
....
for i:=0 to OpenDialog1.Files.Count-1 do
  xx.LoadFormFile(OpenDialog1.Files.Strings[i]);

Answer 2

OpenDialog1.Options := [ofAllowMultiSelect];或OpenDialog1.Options := OpenDialog1.Options + ofAllowMultiSelect;