![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
AetLayeredWindowAttributes объясните что не так делаю! [D6, WinXP]
Denius © (2003-10-01 20:04:00)
Пытаюсь сделать панельке прозрачный цвет. Посмотрел как работает TransparentColor у TForm. Передрал, разобрался, что где указывать... И... Не работает...
Если все это делать с хендлом главной формы все в поряде, а вот с хендлом TPanel не хочет...
procedure TForm1.Panel1Click(Sender: TObject);
Var AStyle : Integer;
color : integer;
hwnd : Integer;
begin
hwnd := panel1.handle;
color := panel1.color;
AStyle := GetWindowLong(Hwnd, GWL_EXSTYLE);
SetWindowLong(Hwnd, GWL_EXSTYLE, AStyle or WS_EX_LAYERED);
SetLayeredWindowAttributes(Hwnd,color , 0, LWA_COLORKEY);
end;
Объясните мне чем отличаются для винды окно "главная форма" и окно "panel"
NAlexey (2003-10-06 16:42:00) [1]
Тебе же сказал mike.dld что не подходит это для дочерних окон. Panel - это дочернее окно по отношению к форме(ну или к тому на ком она лежит) Panel не может себя рисовать нигде кроме как на Parent. А форма может, у нее нет Parent она не дочернее окно, а Panel дочернее окно. И как уже сказал mike.dld не подходит этот метод для дочерних окон. Можешь делать прозрачными диалоги, меню, формы все НЕ дочерние контролы.
Denius (2003-10-06 16:08:00) [2]
Народ, в чем разница между формой и панелью TPanel в контексте окон API?
Denius (2003-10-02 14:49:00) [3]
Ну к стати сказать, тут идет установка не полупрозрачности/alfablend, а процрачного цвета то есть transparentcolor...
Объясните, кто сечет, чем в данном случае отличаются окна формы и панельки
Rem (2003-10-02 14:40:00) [4]
SetWindowRgn()
mike.dld (2003-10-02 04:48:00) [5]
дочерние компоненты нельзя сделать полупрозрачными (с помощью этой функции), она подходит только для окон