Текущий архив: 2003.11.27;
Скачать: CL | DM;
ВнизAetLayeredWindowAttributes объясните что не так делаю! Найти похожие ветки
← →
Denius (2003-10-01 20:04) [0]Пытаюсь сделать панельке прозрачный цвет. Посмотрел как работает 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"
← →
mike.dld (2003-10-02 04:48) [1]дочерние компоненты нельзя сделать полупрозрачными (с помощью этой функции), она подходит только для окон
← →
Rem (2003-10-02 14:40) [2]SetWindowRgn()
← →
Denius (2003-10-02 14:49) [3]Ну к стати сказать, тут идет установка не полупрозрачности/alfablend, а процрачного цвета то есть transparentcolor...
Объясните, кто сечет, чем в данном случае отличаются окна формы и панельки
← →
Denius (2003-10-06 16:08) [4]Народ, в чем разница между формой и панелью TPanel в контексте окон API?
← →
NAlexey (2003-10-06 16:42) [5]Тебе же сказал mike.dld что не подходит это для дочерних окон. Panel - это дочернее окно по отношению к форме(ну или к тому на ком она лежит) Panel не может себя рисовать нигде кроме как на Parent. А форма может, у нее нет Parent она не дочернее окно, а Panel дочернее окно. И как уже сказал mike.dld не подходит этот метод для дочерних окон. Можешь делать прозрачными диалоги, меню, формы все НЕ дочерние контролы.
Страницы: 1 вся ветка
Текущий архив: 2003.11.27;
Скачать: CL | DM;
Память: 0.45 MB
Время: 0.01 c