Сейчас на форуме: asfa, bartolomeo, hgdagon (+6 невидимых) |
eXeL@B —› Программирование —› Прозрачность цвета |
Посл.ответ | Сообщение |
|
Создано: 31 мая 2006 13:39 · Личное сообщение · #1 Доброго времени суток всем! Никто не знает, как API'вскими методами осуществить прозрачность определенного цвета на окне, как это было реализовано в Делфях (там можно указать определенный цвет, который будет прозрачен, т.е. если у нас есть черный Label и мы делаем прозрачным черный цвет, то в месте, где был лэйбл мы видим грубо говоря дырку, через которую можем кликать на нижележащее окно)? Спасибо. ----- Флэш, ява, дотнет - на завтрак, обед и ужин. Unity3D на закуску. |
|
Создано: 31 мая 2006 13:45 · Личное сообщение · #2 |
|
Создано: 31 мая 2006 13:48 · Личное сообщение · #3 |
|
Создано: 31 мая 2006 13:51 · Личное сообщение · #4 дык помойму только так и нуно делать... в аттаче пример на вб6... 5c66_31.05.2006_CRACKLAB.rU.tgz - SetWindowRgn.rar |
|
Создано: 31 мая 2006 14:09 · Личное сообщение · #5 |
|
Создано: 31 мая 2006 14:14 · Личное сообщение · #6 |
|
Создано: 31 мая 2006 14:24 · Личное сообщение · #7 |
|
Создано: 31 мая 2006 14:41 · Личное сообщение · #8 |
|
Создано: 31 мая 2006 15:10 · Личное сообщение · #9 |
|
Создано: 31 мая 2006 15:29 · Личное сообщение · #10 |
|
Создано: 31 мая 2006 17:07 · Личное сообщение · #11 TMyForm = class (TForm) ... protected procedure CreateParams(var Params: TCreateParams); override; end; ... const WS_EX_LAYERED = $00080000; LWA_COLORKEY = $00000001; LWA_ALPHA = $00000002; procedure TMyForm .CreateParams(var Params: TCreateParams); begin inherited CreateParams(Params); with Params do begin ExStyle:=WS_EX_LAYERED; end; end; procedure TMyForm .FormCreate(Sender: TObject); begin SetLayeredWindowAttributes(Handle, ColorToRGB(ПРОЗРАЧНЫЙ_ЦВЕТ), 0, LWA_COLORKEY) end; |
|
Создано: 31 мая 2006 18:35 · Личное сообщение · #12 |
|
Создано: 01 июня 2006 11:11 · Личное сообщение · #13 Вот нарисовал оба метода на masm9 http://slil.ru/22800731 http://slil.ru/22800731 password:cracklab Безусловно метод SetLayeredWindowAttributes лучше... Жаль работает только в 2k/xp... [dicr0n] пишет: Delphi/BCB использует также SetWindowRgn... В доказательство ;) На самом деле так рисует uxtheme.dll А Delphi/BCB использует как-раз-таки SetLayeredWindowAttributes ;) |
eXeL@B —› Программирование —› Прозрачность цвета |