ich benutze in einem kleinem Programm TSaveDialog zum Speichern. Da ich in verschiedenen Formaten (*.bmp,*.jpg,*.ico) speichern möchte muss ich im Dialog eine Auswahl treffen. Als Standard habe ich *.png definiert und als Filename "Unbenannt.png" eingetragen. Dies funktioniert auch alles einwandfrei, ich kann auch in den verschiedenen Formaten speichern. Was ich nicht hin bekommen (und ich google schon länger) ist das beim Filename der im Editfeld steht die Dateinamenerweiterung angezeigt wird. Also wenn ich z.Bsp. *.bmp anwähle soll Unbenannt.bmp im Editfeld stehen. Hab auch schon mit OnTypChange herum probiert, komme ich aber nicht weiter. Mein System Lazarus 1.6 und Ubuntu 16.04LTS.
Bin für jeden Tipp dankbar.
Viele Grüße!
Code: Alles auswählen
SaveDialog1 := TSaveDialog.Create(self);
SaveDialog1.Title := 'Datei Speichern Unter';
SaveDialog1.Options := [ofoverwriteprompt,ofpathmustexist];
SaveDialog1.FileName := 'Unbenannt.png';
SaveDialog1.DefaultExt := '.png';
SaveDialog1.Filter := 'PNG- Dateien (*.png)|*.png|Bitmap- Dateien (*.bmp)|*.bmp|Bild- Datei (*.jpg)|*.jpg|Icons (*.ico)|*.ico';
SaveDialog1.OnTypeChange := @TypChange;