Polecenie UNDO w RichEdit

Aby po kliknięciu przycisku Button1 wykonać polecenie UNDO w RichEdit wywołujemy funkcję Perform():

Unit1.cpp

void __fastcall TForm1::Button1Click(TObject *Sender)
{
   RichEdit1->Perform(EM_UNDO, 0, 0);
}