Код обработки события OnClick
Листинг 13.2.Код обработки события OnClick
procedure TForm1.Button1Click(Sender: TObject);
begin
Form1.Refresh; // Вызываем метод обновления формы end;
Запустим приложение на выполнение. Сразу после запуска произойдет событие первоначальной прорисовки формы. В результате появится окно сообщения об обновлении формы (рис 13.2).
Попробуйте изменить размеры формы в сторону увеличения или нажмите на кнопку Button1. В результате вы увидите то же самое информационное окно.
Таким образом, во время перерисовки компонента вы можете выполнить необходимые действия.