Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.05.06;
Скачать: CL | DM;

Вниз

ПолупрозрачнойФОРМА   Найти похожие ветки 

 
Trix ©   (2002-04-24 00:26) [0]

Как делать форму полупрозрачной


 
Chepel   (2002-04-24 02:44) [1]

для D5/Win2000 (WinMe??)

//вкл. прозрачность
SetWindowLong(hWnd, GWL_EXSTYLE, GetWindowLong(hWnd,
GWL_EXSTYLE) or WS_EX_LAYERED);

//уст. уровень прозрачности
SetLayeredWindowAttributes(hWnd, 0, bAlpha, LWA_ALPHA);

//выкл. прозрачность
SetWindowLong(hWnd, GWL_EXSTYLE, GetWindowLong(hWnd, GWL_EXSTYLE) and not WS_EX_LAYERED);
RedrawWindow(hWnd, nil, 0, RDW_ERASE or RDW_FRAME or RDW_INVALIDATE or RDW_ALLCHILDREN);

где
function SetLayeredWindowAttributes (hWnd: HWND; crKey: COLORREF; bAlpha: Byte; dwFlags: DWORD): BOOL; stdcall;
импортировать руками из User32.dll

ну и
const
LWA_COLORKEY = $00000001;
LWA_ALPHA = $00000002;

WS_EX_LAYERED = $80000;
WS_EX_TRANSPARENT = $20;

желательно либу цеплять динамически (GetModuleHandle()/GetProcAddress()) чтобы на NT прога не падала выпучив глаза... =)


 
arhelon ©   (2002-04-24 07:29) [2]

в Win9x прозрачность не поддерживается.



Страницы: 1 вся ветка

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

Наверх




Память: 0.47 MB
Время: 0.01 c
6-17660
Morozik
2002-02-18 12:57
2002.05.06
Winsock


1-17587
СергейП
2002-04-22 15:56
2002.05.06
Report


1-17538
Юляша
2002-04-23 22:50
2002.05.06
Проверка существования формы


3-17476
s-gorbachev
2002-04-12 12:10
2002.05.06
Как сортировать строки в IBTable


1-17514
Lord BDV
2002-04-21 13:48
2002.05.06
TAnimate - нужна срочная помошь