Zitat von
Christian Seehase:
Moin Smart,
die Indizes beginnen bei 1.
An welcher Stelle fragst Du dass denn ab?
An diese:
Delphi-Quellcode:
SaveDialog1.Title := '
Exportieren';
SaveDialog1.Filter := '
Text- Dateien (*.txt)|*.txt|CSV- Dateien (*.csv)|*.csv';
// Abfrage
If SaveDialog1.FilterIndex = 2
Then SaveDialog1.Filename := '
Namenlos.csv';
If SaveDialog1.FilterIndex = 1
Then SaveDialog1.Filename := '
Namenlos.txt';
if SaveDialog1.Execute
then
Memo1.Lines.SaveToFile(Form1.SaveDialog1.Filename);
Du meinst in der OnTypeChange die Abfrage setzen, oder?