Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: Прозрачность+маска Добавлено: 17.11.08 14:43  

Автор вопроса:  tz-man | Web-сайт: terabayt.info | ICQ: 369431909 
Здравствуйте. Есть функция SetLayeredWindowAttributes, с ее помощью можно задавать полупрозрачность формы и прозрачный цвет.



Полупрозрачность

Ret = GetWindowLong(Me.hwnd, GWL_EXSTYLE)
Ret = Ret Or WS_EX_LAYERED
SetWindowLong Me.hwnd, GWL_EXSTYLE, Ret
SetLayeredWindowAttributes Me.hwnd, 0, 225, LWA_ALPHA


Маска
Ret = GetWindowLong(Me.hwnd, GWL_EXSTYLE)
Ret = Ret Or WS_EX_LAYERED
SetWindowLong Me.hwnd, GWL_EXSTYLE, Ret
SetLayeredWindowAttributes Me.hwnd, vbBlack, 0, LWA_COLORKEY



Вопрос, можно ли сделать это вместе, то есть, чтобы и полупрозрачный цвет учитывался, и чтобы сама форма еще была полупрозрачной.

У меня пока идея только регионами форму резать, а полупрозрачность задавать этой функцией.

Может кто подскажет другие варианты?

Ответить

  Ответы Всего ответов: 1  

Номер ответа: 1
Автор ответа:
 Winand



Вопросов: 87
Ответов: 2795
 Web-сайт: winandfx.narod.ru
 Профиль | | #1
Добавлено: 17.11.08 20:20
конечно же можно одновременно) кстати мог бы и догодацо сам
  1. Call SetWindowLong(hWnd, GWL_EXSTYLE, GetWindowLong(hWnd, GWL_EXSTYLE) Or WS_EX_LAYERED)
  2. SetLayeredWindowAttributes Me.hwnd, vbRed, 225, LWA_ALPHA + LWA_COLORKEY

так-то.

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам