String splitten in TArray<string>

[Mavarik]

Wenn ich es richtig sehen, nutzen viele eine TStringliste um aus einem String mit Delimiter ein TArray<String> zu machen.
Die Stringliste sieht - wie wahrscheinlich viele das Ende eines Strings an, wenn es ein #0 findet.

Ein:

Delphi-Quellcode:

Var
  S : String;
  A : TArray<String>;
begin
  S := 'Frank;Pet'+#0+'er;Elke';
  A := Split(S,';'); 
end;

Würde also ein Array erzeugen ['Frank','Pet'] Für viele Anwendungen währe das sicherlich ok, weil Strings i.d.R. kein #0 enthalten...

Was ist mit Split('Frank;"Peter";Elke'); Soll das ['Frank','Peter','Elke'] ergeben oder doch eher ['Frank','"Peter"','Elke'] ?

Weil wenn ich einen String habe: 'Frank;Delimiter können ";" oder auch ",";sein' möchte ich doch lieber das Array
['Frank','Delimiter können ";" oder auch ","','sein'] haben.

Oder?

Grüsse Mavarik :coder'

[Uwe Raabe]

Ich finde, der String-Helper macht das schon ganz gut:

Delphi-Quellcode:

procedure Main;
Var
  S : String;
  A : TArray<String>;
begin
  S := 'Frank;Pet'+#0+'er;Elke';
  A := S.Split([';']);
  Assert(Length(A) = 3);
  S := 'Frank;Delimiter können ";" oder auch ",";sein';
  A := S.Split([';',','], '"', '"');
  Assert(Length(A) = 3);
end;

[Mavarik]

Zitat von Uwe Raabe:

Ich finde, der String-Helper macht das schon ganz gut:

Ach...
Bei dir bricht er nicht beim #0 ab?
Es ging mir auch nicht darum, das es verschiedene Delimiter gibt, sondern ob ich erwarte die QuoteChars im finalen Array zu haben oder nicht!

[Uwe Raabe]

Zitat von Mavarik:

Bei dir bricht er nicht beim #0 ab?

Nein. Andernfalls hätte das Array ja auch nur zwei Einträge und die erste Assertion würde ansprechen.

[Gandalf2265]

Hallo Frank,

im Beispiel von Uwe bricht er bei mir beim dem #0 auch nicht ab sondern nimmt es mit in den String.
Eventuell ein Unterschied zwischen 10.3 und 10.4?

[Mavarik]

Zitat von Uwe Raabe:

Zitat von Mavarik:

Bei dir bricht er nicht beim #0 ab?

Nein. Andernfalls hätte das Array ja auch nur zwei Einträge und die erste Assertion würde ansprechen.

Mit welchem compiler? Bei mir geht es nicht!

Mavarik

[Mavarik]

10.4.2

[DeddyH]

Du benutzt ja auch nicht Uwes Code, sondern eine Stringliste.

[Mavarik]

Zitat von DeddyH:

Du benutzt ja auch nicht Uwes Code, sondern eine Stringliste.

Danke...

Ich habe nicht gesehen, dass Uwe nicht auf meine Fragestellung eingegangen ist...

Zitat von Mavarik:

Wenn ich es richtig sehen, nutzen viele eine TStringliste um aus einem String mit Delimiter ein TArray<String> zu machen.

Das klärt es!

[Uwe Raabe]

Zitat von Mavarik:

Ich habe nicht gesehen, dass Uwe nicht auf meine Fragestellung eingegangen ist...

Schon, wenn man nicht nur das Verhalten der TStringList in Frage stellen will, sondern eine Lösung für das Split-Problem möchte:

Zitat von Uwe Raabe:

Ich finde, der String-Helper macht das schon ganz gut

Hier übrigens der Code erweitert für das Quotes oder Nicht-Quotes Problem

Delphi-Quellcode:

Var
  S : String;
  A : TArray<String>;
begin
  S := 'Frank;Pet'+#0+'er;Elke';
  A := S.Split([';']);
  Assert(Length(A) = 3);

  S := 'Frank;"Peter";Elke';
  A := S.Split([';']);
  Assert(Length(A) = 3);
  Assert(A[1] = '"Peter"');

  A := S.Split([';"', '";', ';']); // Reihenfolge ist wichtig!
  Assert(Length(A) = 3);
  Assert(A[1] = 'Peter');

  S := 'Frank;Delimiter können ";" oder auch ",";sein';
  A := S.Split([';',','], '"', '"');
  Assert(Length(A) = 3);
end;