Мой Kbyte.Ru
Рассылка Kbyte.Ru
Группы на Kbyte.Ru
Партнеры Kbyte.Ru
Реклама
Сделано руками
Сделано руками
> Исходные коды - Алексей Немиро -

Visual Basic 5.0/6.0 - Окна и формы

Все примеры / Интерфейс / Окна и формы

Форма поверх всех окон

Автор: Алексей Немиро | добавлено: 05.03.2010, 14:49 | просмотров: 3585 (2+) | комментариев: 0 | рейтинг: *x1
Пример показывает, как можно разместить форму по верх всех окон.

Инструкции

Создайте стандартный EXE-проект. На форме (Form) разместите элемент CheckBox. Также, дополнительно добавьте новый модуль (Module).

Код

'*******************************************************
'КОД ФОРМЫ (FROM)
'*******************************************************

Private Sub Check1_Click() 
 If Check1.Value = vbChecked Then 
  SetWindowPos Me.hwnd, HWND_TOPMOST, _ 
         0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE 
 Else 
  SetWindowPos Me.hwnd, HWND_NOTOPMOST, _ 
         0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE 
 End If 
End Sub 

'*******************************************************
'КОД МОДУЛЯ
'*******************************************************

Public Declare Function SetWindowPos _ 
        Lib "user32" (ByVal hwnd As Long, _ 
        ByVal hWndInsertAfter As Long, _ 
        ByVal x As Long, ByVal y As Long, _ 
        ByVal cx As Long, ByVal cy As Long, _ 
        ByVal wFlags As Long) As Long 

Public Const SWP_NOMOVE = &H2 
Public Const SWP_NOSIZE = &H1 
Public Const HWND_TOPMOST = -1 
Public Const HWND_NOTOPMOST = -2
Обратите внимание
Язык Visual Basic 6.0 является устаревшим. Многие примеры, размещенные на нашем сайте, были созданы еще во времена Windows 98 и могут не работать в современных операционных системах.
Если у вас возникнут какие-либо проблемы или вопросы, вы можете обратиться за помощью на наш форум.
Об авторе

Алексей Немиро

Интернет-деятель. Автор многочисленных статей и переводов статей по программированию и информационным технологиям. Работы Алексея можно найти в популярных печатных изданиях компьютерной тематики. Автор проекта Kbyte.Ru.
Сейчас Алексей занимается профессиональным Web-программированием на базе технологий .NET Framework. Иногда пишет различные программки и компоненты для Windows и Android. В свободное время занимается Web-дизайном, увлекается фото- и видеосъемкой.

См. также:
Профиль автора
Алексей Немиро
Последние комментарии (всего: 0)

Добавлять комментарии могут только зарегистрированные пользователи сайта.
Если у Вас уже есть учетная запись на Kbyte.Ru, пройдите процедуру авторизации OpenID.
Если Вы еще не зарегистрированы на Kbyte.Ru - зарегистрируйтесь.


Нет комментариев...

Авторизация
 
OpenID
Зарегистрируйся и получи 10% скидку на добавление своего сайта в каталоги! Подробнее »
Поиск по сайту
Реклама
Счетчики