Форум программистов, компьютерный форум, киберфорум
Microsoft Access
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/4: Рейтинг темы: голосов - 4, средняя оценка - 5.00
90 / 87 / 15
Регистрация: 13.04.2015
Сообщений: 545
1

Перехват свертывания/развертывания окна приложения

23.05.2016, 14:23. Показов 812. Ответов 2
Метки нет (Все метки)

Всем привет!
не получается перехватить с помощью VBA свертывание и развертывание основного окна приложения. Есть у кого идеи?
0

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
23.05.2016, 14:23
Ответы с готовыми решениями:

Access - перехват стандартного окна сохранения отчета
Дорогие друзья!!! Подскажите пожалста - как перехватить стандартное окно сохранения отчета...

Как узнать, нажата ли кнопка свертывания окна?
и вместо стандартных действий свертывания окна направить его в трей? Я предпологаю надо делать хук,...

Ошибка развёртывания приложения WP
Создал проект WP и при попытке собрать приложение происходит ошибка Check the AppXDeployment-Server...

Как отследить событие развертывания окна
2 часа не могу найти , уже бошка кипит . Нужно отловить событие развертывания окна программы из...

2
Эксперт MS Access
26662 / 14352 / 3178
Регистрация: 28.04.2012
Сообщений: 15,731
23.05.2016, 14:48 2
У Application нет событий для перехвата состояния окна. И можно предложить только по таймеру формы.
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Private Declare Function IsZoomed Lib "user32" (ByVal hwnd As Long) As Long
 
Private Sub Form_Load()
    Me.TimerInterval = 100
End Sub
 
Private Sub FormTimer()
    Static bl As Boolean
    Dim Boo As Boolean
 
    Boo = IsZoomed(Application.hWndAccessApp) 
    If bl <> Boo Then
        If Boo Then
            MsgBox "Окно приложения развернуто"
        Else
            MsgBox "Окно приложения минимизировано или свернуто в иконку"
        End If
    End If
    bl = Boo
End Sub
В принципе можно также отделить состояние "минимизировано" от "свернуто в иконку" если воспользоваться API-функцией IsIconic
0
90 / 87 / 15
Регистрация: 13.04.2015
Сообщений: 545
23.05.2016, 15:15  [ТС] 3
mobile, спасибо, попробую. Задача в том, чтоб прятать окно акса, а при сворачивании/разворачивании оно опять появляется=( Вот и думал выловить как-то и по новой скрывать

Добавлено через 15 минут
mobile, а форму уловить можно? при сворачивании всего приложения
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
23.05.2016, 15:15

Выбор пути для развёртывания ClickOnce - приложения
Дамы и господа, доброго времени суток! Проблема следующего характера: пишу приложение для фирмы в...

Php скрипт для развертывания приложения на хостинге
День добрый. Для нового проекта с открытым кодам захотелось придумать некую систему, с помощью...

Как можно избежать развёртывания окна паскаля во весь экран
подскажите пожалуйста как можно избежать развёртывания окна паскаля во весь экран. пишу в борланде....

Что нужно для развёртывания ASP.NET Core 2.2 приложения и на этом же сервере ReactJS веб приложение?
Клиент на ReactJS, сервер на C#. Что нужно? Например, я использую MySQL в качестве БД. ОС может...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.