Текстуру на форму.

← →
Сергей © (2004-09-14 21:21) [0]

Как сделать фоном формы текстуру.Спасибо.

← →
Palladin © (2004-09-14 21:33) [1]

Картинку штоль?

← →
KilkennyCat © (2004-09-15 01:55) [2]

Обработать событие репаинта формы. В двумерном цикле, ограниченном ширинаформы/ширинакартинки и высотаформы/высотакартинки, рисовать прямоугольники текстуры на форму.

← →
Defunct © (2004-09-15 04:15) [3]

Сергей © (14.09.04 21:21)

Сложный но правильный путь, годится не только для формы но и для TPanel, TPaintBox и т.п.:
1. перекрыть метод Paint формы.
2. при создании формы создать Bitmap соответствующего размера.
3. заполнить Bitmap прямоугольниками текстуры.
4. при событии OnResize выполнить пункты [2,3]

Перекрытый метод Paint должен только копировать на форму содержимое Bitmap, созданного в п.[2], либо вызывать предка если Bitmap не был создан.

Простой путь:
Кинуть на форму Image, установить его свойство StretchDraw в True, загрузить текстуру в Picture.

Defunct © (15.09.04 04:15) [3]

поправка:

4. при событии OnResize изменить размеры Bitmap (width, height)и выполнить пункт [3]

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