Registriert seit: 17. Jun 2006
Ort: Bautzen
503 Beiträge
FreePascal / Lazarus
|
AW: String in drei teilen
11. Mär 2011, 15:19
scrat1979 ich habe dein code mal ausprobiert da der von mkinzler nicht funktioniert hatt......
funzt doch einwandfrei!?
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
sl: TStrings;
begin
sl := TStringlist.Create;
sl.Delimiter := '|';
sl.DelimitedText := 'test0|test1|test2';
ShowMessage(sl[0]+'+'+sl[1]+'+'+sl[2]);
sl.Free;
end;
Edit: getestet mit D2010
Edit2: Sorry, vergesst es, ist ja schon geklärt, ich hatte das Browserfenster ne Weile offen und nicht aktualisiert
Es ist unmöglich, witzig zu sein ohne ein bisschen Bosheit. Die Bosheit eines guten Witzes ist der Widerhaken, der ihn haften lässt. - Georg Christoph Lichtenberg
Geändert von TonyR (11. Mär 2011 um 15:23 Uhr)
|