| Вопрос: Полупрозрачность | Добавлено: 17.11.03 02:32 |
Автор вопроса:  ZagZag | ICQ: 295002202 |
|
Как с помошью АПИ сзелать окно полупрозрачным
|
| Ответы | Всего ответов: 2 |
|
Номер ответа: 1 Автор ответа: Dima22 Вопросов: 5 Ответов: 57 |
Профиль | | #1 | Добавлено: 18.11.03 19:51 |
|
Только для win2000/XP - загляни на vbrussian.com |
||
|
Номер ответа: 2 Автор ответа:  Александр Разработчик Offline Client ICQ: 204034 Вопросов: 106 Ответов: 1919 |
Профиль | | #2 | Добавлено: 21.11.03 18:05 |
|
Private Declare Function SetWindowLong Lib "USER32" Alias "SetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long Private Declare Function SetLayeredWindowAttributes Lib "USER32" (ByVal hWnd As Long, ByVal crKey As Long, ByVal bAlpha As Byte, ByVal dwFlags As Long) As Long Private Sub Form_Load() SetWindowLong Me.hWnd, (-20), &H80000 SetLayeredWindowAttributes Me.hWnd, 0, 200, &H2 End Sub Есть еще пример - пиши если нужно |
||
Страница: 1 |