![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как вывести окно с прозрачным цветом. [Delphi]
Nikfel © (2008-03-20 14:36:00)Подскажите, пожалуйста. Без кол можно было просто задавать свойство transparent=true и указывать какой color будет прозрачным. А на кол так и не смог разобраться как это делается, но есть одна версия: наверно надо выбрать transparent=true и тогда вся форма будет прозрачной, но при перемещении будет оставаться прежний фон, а значит нужно каким-то образом отловить перемещение окна программы и вывести то, что находится под окном, но если я прав то, тогда как мне это сделать. Заранее спасибо.
Фйцу (2009-05-30 22:34:00) [1]Дмитрий К спасибо тебе огромное
Nikfel (2008-05-07 20:12:00) [2]Спасибо, попробую.
Дмитрий К (2008-05-04 19:30:00) [3]
Form.ExStyle := Form.ExStyle or WS_EX_LAYERED;
SetLayeredWindowAttributes(Form.Handle, TransparentColor, 200, LWA_COLORKEY or LWA_ALPHA);
Nikfel (2008-05-04 19:01:00) [4]Код работает, но когда задаешь AlphaBlend=200, то становится прозрачный цвет снова видимым, а окно частично прозрачное. Как сделать сохранение прозрачности цвета и прозрачность окна вместе, а то ни как не могу разобрать.Подскажите пожалуйста.
Дмитрий К (2008-03-20 18:03:00) [5]
Form.ExStyle := Form.ExStyle or WS_EX_LAYERED;
SetLayeredWindowAttributes(Form.Handle, TransparentColor, 0, LWA_COLORKEY);