VBNet - Форум - Окно программы поверх других окон

Вопрос: Окно программы поверх других окон Добавлено: 01.03.10 20:47

Автор вопроса: Олег

Только сейчас обнаружил, что на форуме нет отдельного раздела по программированию на VB5 и VB6. Удивительно! По Power Бейсику есть, а по этим (гораздо более ходовым) языкам нет...
Поэтому даже не знаю, где можно задать этот вопрос...
Ну ладно, попробую здесь.
Вопрос , в сущности, пустяковый, но я не знаю на него ответ. Честное слово! :)

Сейчас пишу простенькую программу на VB5, и там мне было бы удобно, чтобы окно этой программы всегда было бы поверх других окон. Как это сделать?!
Ответить

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

Номер ответа: 1 Автор ответа: VβÐUηìt Вопросов: 246 Ответов: 3333	Web-сайт: смекаешь.рф Профиль \| \| #1	Добавлено: 01.03.10 21:09
	Пишеш перед кодом формы: Private 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 Dim iTopMost As Boolean Public Property Get TopMost() As Boolean TopMost = iTopMost End Property Public Property Let TopMost(ByVal newValue As Boolean) iTopMost = newValue If iTopMost Then Call SetWindowPos(hwnd, -1, 0, 0, 0, 0, 3) Else Call SetWindowPos(hwnd, -2, 0, 0, 0, 0, 3) End If End Property Эта вася добавит у твоей формы свойство TopMost. Если оно True, то форма всегда поверх остальных, если False - то обычная. Просто пиши: Form1.TopMost = True Ответить

Номер ответа: 2 Автор ответа: Олег Вопросов: 9 Ответов: 30	Профиль \| \| #2	Добавлено: 01.03.10 22:06
	Спасибо огромное! По правде сказать, я не думал, что это так сложно. Думал, что там просто надо какое-нибудь свойство формы использовать... Ответить

Номер ответа: 3 Автор ответа: AWP ICQ: 345685652 Вопросов: 96 Ответов: 1212	Web-сайт: xawp.narod.ru Профиль \| \| #3	Добавлено: 02.03.10 01:18
	Поэтому даже не знаю, где можно задать этот вопрос... 4 темы назад был задан точно такой же вопрос. Ответить

Страница: 1 |