Einzelnen Beitrag anzeigen

HolgerCW

Registriert seit: 28. Nov 2006
Ort: Marl
1.207 Beiträge
 
Delphi XE7 Enterprise
 
#5

Re: CSV-Datei die mit Semikolons getrennt ist einlesen

  Alt 27. Jun 2007, 11:42
Also wenn ich den Code mit dem Delimiter benutze...

Delphi-Quellcode:
sRows := TStringList.Create;
sRows.LoadFromFile('Datei.csv');
sCols.Delimiter := ';';
sCols.StrictDelimiter := true;
sCols := TStringList.Create;
sCols.CommaText := 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].CommaText := sRows[i];
 sRows.Free;
... trennt der trotzdem immer noch bei dem Komma

Liegt das vielleicht an dem Befehl '.CommaText' ?

Gruss

Holger
  Mit Zitat antworten Zitat