Einzelnen Beitrag anzeigen

Benutzerbild von TonyR
TonyR

Registriert seit: 17. Jun 2006
Ort: Bautzen
503 Beiträge
 
FreePascal / Lazarus
 
#21

AW: String in drei teilen

  Alt 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)
  Mit Zitat antworten Zitat