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

   
   
     

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

Страница: 1 |

 

  Вопрос: Поверх всех окон Добавлено: 15.07.11 18:34  

Автор вопроса:  Daniel | Web-сайт: smallsoft.ucoz.com | ICQ: 610950440 
Господа программисты!

Как сделать программу поверх всех окон на Vb6?

Заранее спасибо.

Ответить

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

Номер ответа: 1
Автор ответа:
 Ким Чен Ир



Вопросов: 0
Ответов: 140
  Профиль | | #1 Добавлено: 15.07.11 19:41
У каждого окна есть стили.
Один из них WS_EX_TOPMOST.
Задать явно можно через функцию SetWindowLongPtr.
Или неявно через SetWindowPos.

Ответить

Номер ответа: 2
Автор ответа:
 Ким Чен Ир



Вопросов: 0
Ответов: 140
  Профиль | | #2 Добавлено: 15.07.11 19:44
P.S. не помню, или SetWindowPos не меняет стиль?

Ответить

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



Вопросов: 14
Ответов: 262
  Профиль | | #3 Добавлено: 15.07.11 19:48
Эм. Я ж в твоей темке "Notes" показывал как.
http://vbnet.ru/forum/show.aspx?id=216829#5
  1. 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

  1. SetWindowPos Me.hwnd, -1, 0, 0, 0, 0, 2 Or 1 'Топ
  2. SetWindowPos Me.hwnd, -2, 0, 0, 0, 0, 2 Or 1 'Не топ -_-

Ответить

Номер ответа: 4
Автор ответа:
 Ким Чен Ир



Вопросов: 0
Ответов: 140
  Профиль | | #4 Добавлено: 15.07.11 19:55
Видимо автор не понял, что это.
Сейчас проверил, стиль меняется, значит можно и неявно.

Ответить

Страница: 1 |

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



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