| Вопрос: Проверить открыта ли справка chm... | Добавлено: 17.05.07 15:30 |
Автор вопроса:  art
|
|
Доброго всем врмени суток!
Нужно узнать открыта ли справка программы. Прога написана на vb6. Ситуация такая: к примеру при работе с прогой открыли справку, потом закрываем прогу, а справку не закрыли - вылезает ошибка, типа некорректно заершили работу или что-то в этом роде. Подскажите, как проверить открыта ли справка или нет? Спасибо! |
| Ответы | Всего ответов: 2 |
|
Номер ответа: 1 Автор ответа:  HACKER Разработчик Offline Client Вопросов: 236 Ответов: 8362 |
Профиль | | #1 | Добавлено: 17.05.07 21:14 |
|
Найти окно справки, проверить родителя этого окна - если мы, всё ок...
ищи FindWindow |
||
|
Номер ответа: 2 Автор ответа: art Вопросов: 45 Ответов: 119 |
Профиль | | #2 | Добавлено: 18.05.07 00:14 |
|
Ответ:
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function SendMessage Lib "user32.dll" Alias "SendMessageA" (ByVal hwnd As Long, ByVal Msg As Long, wParam As Any, lParam As Any) As Long Const WM_CLOSE = &H10 на форме: Dim ihWnd As Long
ihWnd = FindWindow(vbNullString, "Название окна" 
If ihWnd <> 0 Then SendMessage ihWnd, WM_CLOSE, 0, 0 2 HACKER: big thanks |
||
Страница: 1 |