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

Как вывести окно с прозрачным цветом.   Найти похожие ветки 

 
Nikfel   (2008-03-20 14:36) [0]

Подскажите, пожалуйста. Без кол можно было просто задавать свойство transparent=true и указывать какой color будет прозрачным. А на кол так и не смог разобраться как это делается, но есть одна версия: наверно надо выбрать transparent=true и тогда вся форма будет прозрачной, но при перемещении будет оставаться прежний фон, а значит нужно каким-то образом отловить перемещение окна программы и вывести то, что находится под окном, но если я прав то, тогда как мне это сделать. Заранее спасибо.


 
Дмитрий К ©   (2008-03-20 18:03) [1]

 Form.ExStyle := Form.ExStyle or WS_EX_LAYERED;
 SetLayeredWindowAttributes(Form.Handle, TransparentColor, 0, LWA_COLORKEY);


 
Nikfel   (2008-05-04 19:01) [2]

Код работает, но когда задаешь AlphaBlend=200, то становится прозрачный цвет снова видимым, а окно частично прозрачное. Как сделать сохранение прозрачности цвета и прозрачность окна вместе, а то ни как не могу разобрать. Подскажите пожалуйста.


 
Дмитрий К ©   (2008-05-04 19:30) [3]

 Form.ExStyle := Form.ExStyle or WS_EX_LAYERED;
 SetLayeredWindowAttributes(Form.Handle, TransparentColor, 200, LWA_COLORKEY or LWA_ALPHA);


 
Nikfel   (2008-05-07 20:12) [4]

Спасибо, попробую.


 
Фйцу   (2009-05-30 22:34) [5]

Дмитрий К спасибо тебе огромное



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

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



Память: 0.46 MB
Время: 0.006 c
6-1254820466
Tailor_McMaffin
2009-10-06 13:14
2012.04.08
SetupAPI -> GUID устройства


2-1324306539
rilmeer
2011-12-19 18:55
2012.04.08
програмное заполнение Tibtable.locate


2-1324039063
ProgRAMmer Dimonych
2011-12-16 16:37
2012.04.08
WSAWaitForMultipleEvents не отпускает по FD_ACCEPT


2-1324037431
Alex_C
2011-12-16 16:10
2012.04.08
Динамическое создание Fields...


2-1324367435
gvozdkoff
2011-12-20 11:50
2012.04.08
узнать запущен ли веб сервер




   Наверх