macos - FireMonkey/Rad Studio XE2：如何在 OS X 上显示 SaveDialog 过滤器？

Question

可能重复：
FireMonkey/Rad Studio XE2：如何在 OS X 上显示 SaveDialog 过滤器？

我创建了一个（Delphi XE2）Firemonkey 示例程序，其中包含一个 TButton 和一个带有两个不同过滤器的 TSavedialog。（TSaveDialog 组件支持 Win32/Win64 和 OS X 平台。）

它在 Win32/Win64 上运行良好，但我现在不明白为什么它在 OS X（VirtualBox/OS X 10.7.x）上不显示 Savedialog 过滤器。

我怎样才能让它在 OS X 上工作？

procedure TForm1.Button_SaveClick(Sender: TObject);
begin
  SaveDialog.Filter:='Format_1 (*.fmt1)|*.fmt1|Format_2 (*.fmt2)|*.fmt2';

  If Savedialog.Execute Then ShowMessage(SaveDialog.FileName+#13+'Selected filterindex: '+Inttostr(SaveDialog.FilterIndex));
end;