FireMonkey / Rad Studio XE2: как я могу показать фильтр SaveDialog на OS X?
Я создал (Delphi XE2) пример программы Firemonkey, которая содержит TButton и TSavedialog с двумя разными фильтрами. (Компонент TSaveDialog поддерживает платформы Win32 / Win64 и OS X.)
Он отлично работает на Win32 / Win64, но я неТеперь, почему он не показывает фильтры Savedialog в OS X (VirtualBox / OS X 10.7.x).
Как я могу заставить его работать на 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;