es sollte genauso funktionieren, wie
ParamStr und
ParamCount, 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