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

Вниз

Изменение прозрачности формы в W 2000 и W XP   Найти похожие ветки 

 
Yury   (2004-12-21 11:25) [0]

Не подскажите, как сделать так, что изменяласть прозрачность окна под Windows 2000 и Windows XP, как в некоторых приложениях?


 
Denis_AC   (2004-12-21 11:55) [1]

А сойство AlphaBlend не подходит?


 
Steepe Wolf ©   (2004-12-21 12:42) [2]

function SetLayeredWindowAttributes(hwnd: longint; crey: byte;
 bAlpha: byte; dwFlags: longint): longint; stdcall;     external "USER32.DLL";

procedure TForm1.Btn1Click(Sender: TObject);
var
old: longint;
begin
old:=GetWindowLongA(Handle,GWL_EXSTYLE);
SetWindowLongA(Handle,GWL_EXSTYLE,old or $80000);
SetLayeredWindowAttributes(handle, 0, NN, $2);
end;

NN - прозрачность 0-255



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

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

Наверх




Память: 0.46 MB
Время: 0.036 c
8-1098395688
фантазер
2004-10-22 01:54
2005.02.06
Список форматов


6-1101119037
Chery
2004-11-22 13:23
2005.02.06
Не работают функции на сервере при Borland Socket - служба.


3-1105042168
Antoha111
2005-01-06 23:09
2005.02.06
Очистка DBLookupComboBox а


1-1106306254
Su-+
2005-01-21 14:17
2005.02.06
Щрифты


11-1089191567
Vladimyr
2004-07-07 13:12
2005.02.06
Эти странные батоны...