Встановіть для форми обробник події OnActivate.
Для зберігання бітових образів (картинок) фону і літака, а також копії області фону, що перекривається зображенням літака, використовуються об'єкти типу TBitMap, які створюються динамічно процедурою FormActivate. Ця ж процедура завантажує з файлів картинки фону (p1.bmp) і повітряного змія (zmij2.bmp), а також зберігає область фону, на яку перший раз накладатиметься картинка.
Оголосіть змінні типу TBіtMap (бітовий образ) в розділі оголошень змінних:
fon, zmij, Buf : TBitMap; // фон, змій, буфер
Для створення об'єктів - бітових образів використайте метод Create.
fon:= TBitmap.Create; // фон
zmij:= TBitmap.Create; // змій
Buf := TBitmap.Create; // буфер
Завантажте і виведіть фон (рис. 5.2.).
Завантажити в бітовий образ fon потрібну картинку можна за допомогою методу LoadFromFіle, указавши як параметр ім'я BMP-файлу, у якому перебуває потрібна ілюстрація (наприклад, 'F:\p1.bmp).
fon.LoadFromFile('F:\p1.bmp');
Рис.5.2. Результат завантаження фону в бітовий образ
Вивести вміст бітового образу (картинку) на поверхню форми або області виведення ілюстрації можна шляхом застосування методу Draw до відповідної властивості поверхні (canvas).
Form1.Image1.canvas.Draw(0,0,fon);
