Вниз
Скачать: CL | DM;

Заливка 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.


 
AlexV ©   (2004-03-10 13:20) [4]

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


 
Gero ©   (2004-03-10 17:47) [5]

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



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.024 c
14-1083481434
XIII
2004-05-02 11:03
2004.05.23
Зацените Сайтец http://TIMUR.NeT.RU


3-1083066585
strelok-47
2004-04-27 15:49
2004.05.23
Работа с MS SQL через OLE, ошибка подсоеденения


1-1084002626
Jiurasdfgfr
2004-05-08 11:50
2004.05.23
Как первести фокус на другое окно?


1-1083928124
Tomkat
2004-05-07 15:08
2004.05.23
Модульное приложение в Delphi


8-1078908668
КомофОнСамый
2004-03-10 11:51
2004.05.23
чем загрузить на TImage картинку TIF?




   Наверх