also, ich hab jetzt das selbe problem, und habe folgenden ansatz:
Delphi-Quellcode:
procedure TForm_Main.SaveDialogTypeChange(Sender: TObject);
var Temp:TStringDynArray;
Dialog: TSaveDialog;
begin
Dialog:=TSaveDialog(Sender);
Temp:=Explode('|',Dialog.Filter);
Dialog.FileName:=ExtractFileDir(Dialog.FileName)+ExtractFileName(Dialog.FileName)+Temp[Dialog.FilterIndex*2-1];
end;
nur es verändert sich nichts...
warum gibt es weder Dialog.Refresh noch Dialog.Update????