Фоновый рисунок формы

← →
vitaliy_new (2002-11-21 12:08) [0]

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

← →
Song © (2002-11-21 12:48) [1]

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

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

При создании формы создаёшь битмэп(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);

Фоновый рисунок формы Найти похожие ветки