Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Фоновый рисунок формы [D5, Win95/98, NT4, Win2k, WinXP]


vitaliy_new ©   (2002-11-21 12:08:00) 

Господа, подскажите, как можно на форму положить фоновый рисунок, используя 3 вида представления:
- tile
- stretch
- center
Кстати, хотелось бы иметь возможность загружать рисунки в формате JPEG.


Fenik   (2002-11-24 11:19:00) [1]

При создании формы создаёшь битмэп(FBitmap) и загружаешь в него фоновый рисунок.
В обработчике OnPaint выполняешь прорисовку:

tile:

Form1.Canvas.Brush.Bitmap := FBitmap;
Form1.Canvas.FillRect(Rect(0, 0, Width, Height));


stretch:

Form1.Canvas.StretchDraw(Rect(0, 0, Width, Height), FBitmap);


center:

Form1.Canvas.Draw(Width div 2 - FBitmap.Width div 2,
Height div 2 - FBitmap.Height div 2, FBitmap);


Song   (2002-11-21 12:48:00) [2]

TImage положи на форму:
stretch: TImage.Width/Height
center: TImage.Left/Top
tile: надо вручную разможать на канве и выводить по принципу center.

Всё это делай сам. Примера нет.


Наверх

Титульная страница Поиск, карта сайта Написать письмо