Stringgrid als CSV datei speichern.

[Sir Rufo]

Hi,

also statt
If Copy(FileName,Pos('.',FileName),Length(FileName)-Pos('.',FileName)+1) <> '.csv' Then FileName := FileName + '.csv'; würde ich ja
FileName := ChangeFileExt( FileName, '.csv' ); nehmen.
Denn sonst passiert das:
'Meine.csv.Datei.csv' --falsch--> 'Meine.csv.Datei.csv.csv' --richtig--> 'Meine.csv.Datei.csv'
'Meine.Tolle.Datei.txt' --falsch--> 'Meine.Tolle.Datei.txt.csv' --richtig--> 'Meine.Tolle.Datei.csv'

cu

Oliver