Событие OnPaint

Используйте событие OnPaint для выполнения некоторых действий при перерисовке формы.

Событие OnPaint происходит перед тем, как компоненты управления отображаются на форме.

Если Вы хотите, чтобы перерисовывалась не вся форма, а только ее часть – используйте свойство ClipRect объекта Сanvas ( например, Form1.Canvas).

Пример. Использование события OnPaint

Пусть обработчик события OnPaint используется для нанесения растрового изображения (B itmap) в качестве фона формы.

Добавим в класс TForm1 закрытый объект – TheGraphic: TBitmap, а в метод FormCreate операторы его создания и загрузки. В обработчике события OnPaint вызовем метод Draw для рисования на форме объекта TheGraphic.

procedure TForm1.FormPaint(Sender: TObject); // обработчик события

// OnPaint

Begin

Form1.Canvas.Draw(0, 0, TheGraphic); // рисование на холсте формы

end;

procedure TForm1. FormCreate (Sender: TObject); // обработчик события

// Создание формы

Begin

TheGraphic:= TBitmap.Create; // Создание объекта TheGraphic

TheGraphic.LoadFromFile('BKGRND.png'); // Загрузка из файла

end;


СПИСОК ЛИТЕРАТУРЫ

1. Мейер Б., Бодуэн К. Методы программирования. т. 1. М.: Мир, 1982.

2. Miller L.N. Advanced programming: Design and Structure using Pascal, Addison-Wesley publishing Company, 1986.

3. Вирт Н. Алгоритмы и структуры данных. – М.: Мир, 1989.

4. Delannoy C. Exercises en Turbo-Pascal, Eyrolles, Paris, 1990.

5. Епанешников А., Епанешников В. Программирование в среде Turbo-Pascal 7.0. Москва, «Диалог-МИФИ», 1993.

6. Самуйлов С.В. Разработка программ в среде Турбо-Паскаля 7.0. Лабораторный практикум. Пенза, 1996.

7. Марченко А.И., Марченко Л.А. Программирование в среде Turbo Pascal 7.0, Киев, «Век +», 2000.

8. Фаронов В.В., Turbo Pascal 7.0. Москва, «Надежда», 2000.

9. Брукшир Дж. Гленн. Введение в компьютерные науки. Москва, «Вильямс», 2001.

10. Есипов А.С., Паньгина Н.И., Громада М.Г. Информатика. Задачник. СПб., «Наука и техника», 2001.

11. Пратт Т., Зелковиц М.. Языки программирования: разработка и реализация. СПб., «Питер», 2002

12. Архангельский А.Я. Программирование в Delphi 7. Москва, «Бином», 2005.


ПРИЛОЖЕНИЕ А. КРАТКО О Delphi


Понравилась статья? Добавь ее в закладку (CTRL+D) и не забудь поделиться с друзьями:  



double arrow
Сейчас читают про: