Visual Basic, .NET, ASP, VBScript
Новости | Примеры | Библиотека кодов | НеЧаВо | VBA | Справочник по VB | Справочник по WinAPI | ActiveX контролы | Статьи по VB | Мастерская разработчика | Форум VBNet | Яndex bar! | Голосование | Полезные программы | Магазин VBNet | Рассылка | Конкурсы | Юмор | Чат | Реклама на VBNet | Автора! | Ссылки | Бета-тестирование | Послать пример на сайт
 

   
   
     

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

Страница: 1 |

 

  Вопрос: Прозрачность формы Добавлено: 22.11.03 11:57  

Автор вопроса:  M@X
Подскажите пожалуйста, как при помощи vb сделать прозрачность формы. Операционка ХР

Ответить

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

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



ICQ: 277644901 

Вопросов: 8
Ответов: 28
  Профиль | | #1 Добавлено: 22.11.03 14:08

esli tebe nuzen kod API, to gde-to nedavno sovsem v forume bylo...

a esli mozno i kontrol, to v razdele ActiveX bylo.

Ответить

Номер ответа: 2
Автор ответа:
 Александр



Разработчик Offline Client

ICQ: 204034 

Вопросов: 106
Ответов: 1919
  Профиль | | #2 Добавлено: 22.11.03 18:34

Я юзаю это:

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

Пример рабочий

Ответить

Номер ответа: 3
Автор ответа:
 M@X



Вопросов: 38
Ответов: 43
  Профиль | | #3 Добавлено: 22.11.03 18:41

Спасибо за пример. Попробую...

Ответить

Страница: 1 |

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



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