Код обработки события OnClick



Листинг 13.2.Код обработки события OnClick

procedure TForm1.Button1Click(Sender: TObject);
begin
Form1.Refresh; // Вызываем метод обновления формы end;

Запустим приложение на выполнение. Сразу после запуска произойдет событие первоначальной прорисовки формы. В результате появится окно сообщения об обновлении формы (рис 13.2).

Попробуйте изменить размеры формы в сторону увеличения или нажмите на кнопку Button1. В результате вы увидите то же самое информационное окно.

Таким образом, во время перерисовки компонента вы можете выполнить необходимые действия.



Содержание раздела