(Co-Admin)
Registriert seit: 29. Mai 2002
Ort: Hamburg
11.117 Beiträge
Delphi 11 Alexandria
|
Re: Filter im SaveDialog ansprechen
29. Mär 2005, 23:34
Moin Grolle,
weil SaveDialog1.Filename nun einmal keine Endung enthält.
Wenn, dann so:
Delphi-Quellcode:
case SaveDialog1.FilterIndex of
1 : begin
Pfad := ChangeFileExt(SaveDialog1.FileName, '.txt');
SynEdit1.Lines.SaveToFile(Pfad);
end;
Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist
|