Registriert seit: 11. Nov 2003
Ort: Oldenburg
1.446 Beiträge
Delphi 10.2 Tokyo Enterprise
|
Re: Funktion gesucht: Splitten eines Strings nach Trennzeich
20. Mai 2005, 15:43
Das geht aber auch so
Delphi-Quellcode:
Var
Liste : TStringList;
Begin
Liste:=TStringList.Create;
Liste.Text:='mmm#llll#llko';
Liste.Text:=ReplaceString(Liste.Text,'#',#13#10);
Liste.Free;
End;
Bei replaceString muste eben mal gucken ob ich die Param an die Richtige Stelle gesetzt hab.
[edit=Sharky]Delphi-Tags vervollständigt. Mfg, Sharky[/edit]
Frank Tux sein Lieblingsquellcode
While anzfische<TuxSatt do begin
Fisch:=TFisch.Create; Tux.EssenFisch(Fisch); Fisch.Free;inc(anzfische); end;
|