mal wieder strings

[jeroen_a]

Hi,

ich hab ein folgendn string: wort1,wort2,wort3,wort4

und ich will den string wie folgt aufteilen:

teilstring[0] = wort1
teilstring[1] = wort2
teilstring[2] = wort3
teilstring[3] = wort4

gibs es dazu ein fertig prozedure ?
(wie die explode in php?)

jeroen

[xaromz]

Hallo,

dazu nimmst Du eine TStringList und setzt den Delimiter:

Delphi-Quellcode:

var
  SL: TStringList;
begin
  SL := TStringList.Create;
  //SL.Delimiter := ','; // <- Komma ist bereits voreingestellt
  SL.DelimitedText := 'Wort1,Wort2,Wort3,Wort4';

  ShowMessage(SL[0]);

  SL.Free;
end;

Gruß
xaromz

[3_of_8]

Würde ich nicht machen. Die hat nen Bug: Jedes Leerzeichen wird als Delimiter angesehen.

[xaromz]

Hallo,

Zitat von 3_of_8:

Würde ich nicht machen. Die hat nen Bug: Jedes Leerzeichen wird als Delimiter angesehen.

stimmt. Um das zu verhindern, muss laut OH jeder Eintarg in Anführungszeichen gesetzt werden:
SL.DelimitedText :='"Text 1", "Text 2", "Text 3", "Text4"'; Hab ich aber nicht ausprobiert.

Gruß
xaromz

[3_of_8]

Das wäre es dann doch deutlich einfacher, mal ein bisschen zu suchen.

Wir hatten darüber schon massenhaft Threads und in der CodeLib gibt es auch 2 Einträge dazu.

[jeroen_a]

Hi,

danke. Gibs noch andere Problem neben dem ' ' ?
Ein leerzeichen in String nicht vorkommen.

jeroen

[3_of_8]

Nicht dass ich wüsste. Aber wie gesagt, in der CodeLib gibt es Funktionen dazu.