Thema: Delphi CSV Parser (wieder mal)

Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
37.843 Beiträge
 
Delphi 10.4 Sydney
 
#5

Re: CSV Parser (wieder mal)

  Alt 17. Jun 2009, 15:21
es sollte genauso funktionieren, wie Delphi-Referenz durchsuchenParamStr und Delphi-Referenz durchsuchenParamCount, außer daß man da noch den Zeilen-String mit übergibt.
(das GetParamStr ist nur eine Hilfsfunktion)

Zeile irgendwie aus Datei auslesen
ParamStr(S, 2) ergibt en 3. Wert (Zählung mit 0 beginnend)

PS: in der CodeLib gibt es auch noch Explode, aber ich glaub die Originalversion behandelt kein "

eventuell hilft ja sowas:
Delphi-Quellcode:
Function Explode2(Const S: String): TStringDynArray;
  Var i: Integer;

  Begin
    SetLength(Result, ParamCount(S));
    For i := 0 to High(Result) do
      Result[i] := ParamStr(S, i);
  End;
S = eine Zeile
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
Delphi-Tage 2005-2014
  Mit Zitat antworten Zitat