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

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

memo.onchange:=memo1Change;

procedure TForm1.Memo1Change(Sender: TObject);
begin

panel1.caption:='Содержимое было изменено';

end;

« Предыдущая статья		Следующая статья »