Как проверить состояние окна в Team Developer?

Question

Как проверить состояние окна (свернуто, развернуто и т. Д.) В команде разработчиков? Есть ли встроенная функция для того же?

Answer 1

Используя SalGetWindowState(hWndForm), вы можете проверить любое из следующих состояний:

`Window_Invalid    ( Value = 1 )
 Window_Maximized  ( Value = 3 )
 Window_Minimized  ( Value = 4 )
 Window_Normal     ( Value = 5 )
 Window_NotVisible  ( Value = 2 )`  

Конечно, если вы используете автоматизацию Word, вы не можете ссылаться на hWndForm, поэтому в этом случае используйте:

Set nState = iWord__Application.PropGetWindowState( )

Другие опции:

Set bIsMaximised = VisWinIsMaximized (hWndForm)
Set bIsMinimised = VisWinIsMinimized(hWndForm)
Set bIsNormal = VisWinIsRestored (hWndForm)
Set bIsValid = VisWinIsWindow(hWndForm)

Answer 2

Вы можете использовать функцию SalGetWindowState () для проверки состояния окна.Функция принимает только один аргумент, который является дескриптором проверяемого окна.

If SalGetWindowState(windowhandle) = Window_Minimized
  Call VisWinShow(windowhandle, SHOW_Normal)

Обратите внимание: функция VisWinShow () устанавливает состояние видимости окна.Его первым аргументом является дескриптор окна, а вторым аргументом может быть SHOW_Minimized, SHOW_Normal, SHOW_Maximized или SHOW_Hidden.