Habe es jetzt so umgebaut, aber er trennt immer noch beim Komma:
Delphi-Quellcode:
sRows := TStringList.Create;
sRows.Delimiter := ';';
sRows.StrictDelimiter := true;
sRows.LoadFromFile('Datei.csv');
sCols := TStringList.Create;
sCols.DelimitedText := sRows[0];
FormCSV.StringGridCSV.ColCount := sCols.Count;
sCols.Free;
FormCSV.StringGridCSV.RowCount := sRows.Count;
for i := 0 to Pred(sRows.Count) do
FormCSV.StringGridCSV.Rows[i].DelimitedText := sRows[i];
sRows.Free;
Gruss
Holger