ausgewähltes Combobox Item soll letzten String im Memo

[Luckie]

StringRepalce.

Delphi-Quellcode:

procedure TForm1.ComboBox1Change(Sender: TObject);
begin
  Memo1.Text := StringReplace(Memo1.Text, 'was', Combobox1.Text, [rfReplaceAll]);
end;