scrat1979 ich habe dein code mal ausprobiert da der von mkinzler nicht funktioniert hatt aber es kommen folgende fehlermeldungen:
[Error] Unit2.pas(30): Incompatible types: 'String' and 'Integer'
[Error] Unit2.pas(32): Incompatible types: 'String' and 'procedure, untyped pointer or untyped parameter'
[Fatal Error] Project2.dpr(5): Could not compile used
unit 'Unit2.pas'
Hast du den Code 1:1 übernommen?
Delphi-Quellcode:
procedure TForm1.btn1Click(Sender: TObject);
var
sl: TStringlist; // oder auch TStrings
begin
sl := TStringlist.Create;
sl.Delimiter := '|';
sl.DelimitedText := 'test|test1|test2';
ShowMessage(sl.Strings[0]); // zeigt test an
sl.Free;
end;
Klappt problemlos.