Прозрачность окон в W2k/XP

← →
bobo © (2002-11-13 09:39) [0]

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

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

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

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

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);
...

Прозрачность окон в W2k/XP Найти похожие ветки