Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Прозрачность окон в W2k/XP [D5, Win2k, WinXP]


bobo ©   (2002-11-13 09:39:00) 

Кто подскажет, как программно управлять прозрачностью окон для приложений, работающих в W2k/XP


Ich Hasse   (2002-11-13 21:17:00) [1]

Function SetLayeredWindowAttributes(hwnd: HWND; crKey: COLORREF; bAlpha: byte; dwFlags: dword):bool; stdcall; external "USER32.DLL";


//caphandle от Captured Handle
procedure SetBlend(AlphaBlend:byte);
var old: longint;
begin
old:=GetWindowLongA(Handle,GWL_EXSTYLE);
SetWindowLongA(CapHandle,GWL_EXSTYLE,old or $80000);
SetLayeredWindowAttributes(CapHandle, 0, AlphaBlend, $2);
end;

Пример:

...
SetBlend(128);
...


Слесарь Матерящийся   (2002-11-13 11:37:00) [2]

http://www.delphikingdom.com/asp/answer.asp?IDAnswer=6314

http://www.sources.ru/delphi/gui/setlayeredwindowattributes.shtml


Наверх

Титульная страница Поиск, карта сайта Написать письмо