Добро пожаловать в форум, Guest  >>   Войти | Регистрация | Поиск | Правила | В избранное | Подписаться
Все форумы / FoxPro, Visual FoxPro Новый топик    Ответить
 Текущее окно windows  [new]
glamis
Member

Откуда:
Сообщений: 642
Никто не занимался определением активного окна винды?
Или темой определения где находится пользователь в проге или в инете? или геймит?
13 май 21, 14:56    [22321625]     Ответить | Цитировать Сообщить модератору
 Re: Текущее окно windows  [new]
AK-Shah
Member

Откуда:
Сообщений: 155
glamis
Никто не занимался определением активного окна винды?


Не очень понятно, для чего, собственно ищется это активное окно. Одна из задач поиска активного окна (попробую угадать!) - сделать его активным, то есть вывести поверх всех окон.

Можно так (автор Alex Roublev), например, для окна MS Word:

DECLARE INTEGER FindWindow IN user32 STRING lpClassName, STRING lpWindowName  
  DECLARE INTEGER SetWindowPos IN user32 INTEGER hwnd, INTEGER hWndInsertAfter, ;  
      INTEGER x, INTEGER y, INTEGER cx, INTEGER cy, INTEGER wFlags  
  oWord = CreateObject("Word.Application")  
  nHwnd = FindWindow(.Null., oWord.Caption)  
  oWord.WindowState = 1  
  oWord.Visible = .T.  
  = SetWindowPos(nHwnd, -1, 0, 0, 0, 0, 11)
5 июн 21, 09:00    [22331697]     Ответить | Цитировать Сообщить модератору
Все форумы / FoxPro, Visual FoxPro Ответить