So funktioniert es einwandfrei, obwohl da ne Menge Optimierungspotential drinsteckt
Ich danke euch !
Du weißt gar nicht wie recht Du damit hast
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var sl: TStringlist;
begin
sl := TStringLIst.Create;
ExtractStrings([','],[' '], PChar(Edit1.Text), sl);
Memo1.Text := sl.Text;
sl.Free;
end;
Nachteil: ExtractStrings kann keine leeren Einträge erzeugen - aber wenn die Daten alle in der Art sind wie deine Beispieldaten sollte das ausreichend funktionieren...