C++ Builder - вопросы программирования




Листинг 3 5



Листинг 3.5.

Функции, обеспечивающие формирование и вывод фонового рисунка // обработка события OnCreate void __fastcall TForml::FormCreate(TObject *Sender) { back = new Graphics::TBitmap(); // создать объект — битовый образ // загрузить картинку try // в процессе загрузки картинки возможны ошибки { Forml->back->LoadFromFile("Legal.bmp"); } catch (EFOpenError &e) { return; } } // формирует фоновый рисунок void __fastcall TForml::Background() { int x=0,y=0; // координаты левого верхнего угла битового образа if ( back->Empty) // битовый образ не был загружен return; do { do { Canvas->Draw(x,y,back); x += back->Width; } while (x < ClientWidth); x = 0; у4= back->Height; } while (y < ClientHeight); } // обработка события OnPaint void __fastcall TForml::FormPaint(TObject *Sender) { Background(); // обновить фоновый рисунок }
 











Содержание  Назад  Вперед