![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Прозрачность окон в 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