Заливка TPanel иTButton текстурой.Пытаюсь сообразить прост-й скин

← →
AlexV © (2004-03-06 12:52) [0]

imgTemp.Picture.LoadFromFile("skin0101.bmp"); // Загрузка текстуры
Form1.Brush.Bitmap:=imgTemp.Picture.Bitmap; // Заливка формы
Form1.Refresh;

Panel1.Brush.Bitmap:=imgTemp.Picture.Bitmap; // Это не дало эффекта
Button1.Brush.Bitmap:=imgTemp.Picture.Bitmap; // Это не дало эффекта

Форма залилась, а вот элементы формы Panel1 и Button1 не залились.

Также, если у формы BorderWidth ставлю, например 5, то этот бордер не заливается.

Как проще всего залить эл-ты формы текстурой ?

← →
Gero © (2004-03-06 19:09) [1]

Писать потомков, перехватывать WM_PAINT, и делать собственную прорисовку.

> Form1.Brush.Bitmap:=imgTemp.Picture.Bitmap; ... Форма залилась
Не врите :)

← →
AlexV © (2004-03-09 07:17) [2]

> Form1.Brush.Bitmap:=imgTemp.Picture.Bitmap; ... Форма
> залилась
> Не врите :)

Заливка реально происходит не на этой строке, а после вызова
Form1.Refresh;

← →
Gero © (2004-03-09 08:10) [3]

Заливка не происходит, ибо программа не компилируется.
У TForm нет свойства Brush, если, конечно, Вы его не дописали в TForm1.

Зато свойство Brush есть у TWinControl, от которого потом пошла TForm.
У меня свойство Form1.Brush доступно и прекрасно компилится

Sorry, есть. Был не прав.

Заливка TPanel иTButton текстурой.Пытаюсь сообразить прост-й скин Найти похожие ветки