Thema: CSV in Array

Einzelnen Beitrag anzeigen

Benutzerbild von Sherlock
Sherlock

Registriert seit: 10. Jan 2006
Ort: Offenbach
3.764 Beiträge
 
Delphi 11 Alexandria
 
#5

AW: CSV in Array

  Alt 4. Aug 2016, 07:34
Einfach:
Angenommen Deine csv-Datei sei im ANSI-Format und habe als Feldtrenner das Semikolon.
Delphi-Quellcode:
  
  valueList := TStringList.Create;
  valueList.LoadFromFile('c:\temp\meine-datei.csv');
  rowList := TStringList.Create;
  rowList.Delimiter := ';';
  rowList.StrictDelimiter := True;
  for i := 0 to valuelist.count - 1 do
  begin
    rowList.DelimitedText := valueList[i]; // Falls Du eine Kopfzeile hast, solltest Du die vermutlich überspringen...
    ersterWert := rowList[0]; // So bekommst Du nur Strings, falls Du numerische Werte hast, entsprechend konvertieren.
    vierterWert := rowList[3];
  end;
Nicht vergessen alles beizeiten wieder freizugeben, und eine Fehlerbehandlung sollte auch drum rum. Ich empfehle mindestens ein try...finally.

Sherlock
Oliver
Geändert von Sherlock (Morgen um 16:78 Uhr) Grund: Weil ich es kann
  Mit Zitat antworten Zitat