Delphi World - Создание события во время выполнения приложения

Создание события во время выполнения приложения

на примере переопределения события в Memo:

memo.onchange:=memo1Change;

procedure TForm1.Memo1Change(Sender: TObject);
begin
  panel1.caption:='Содержимое было изменено';
end;