String kopieren/ bearbeiten

[s.h.a.r.k]

a und b waren doch noch nie von einem anderen Typ? Wenns im Edit steht ist es ein String und wenns im Memo eingefügt wird ist es immer noch ein String!

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  s, wertA, wertB : String;
begin
  s := Edit1.Text;
  wertA := copy(s, 1, pos(',', s) - 1);
  wertB := copy(s, pos(',', s) + 1, length(s));

  Memo1.Lines.Add(wertA);
  Memo1.Lines.Add(wertB);
end;