Código Delphi [-] Edit1.Text := StringReplace(Edit1.Text, Edit2.Text, '', [rfReplaceAll]);
Edit1.Text := StringReplace(Edit1.Text, Edit2.Text, '', [rfReplaceAll]);