Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2012.04.08;
Скачать: 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 вся ветка

Текущий архив: 2012.04.08;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.007 c
2-1323931915
И. Павел
2011-12-15 10:51
2012.04.08
Incorrect Syntax на одной машине, а на другой — все работает...


15-1323268620
tee_off
2011-12-07 18:37
2012.04.08
создание объекта внутри своего отдельного юнита


11-1242117482
QAZ
2009-05-12 12:38
2012.04.08
TreeView из списка Файлов


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


15-1323102610
Artem
2011-12-05 20:30
2012.04.08
Прав ли я?