Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / VFP 8 Read Events закрыть главное окно / 6 сообщений из 6, страница 1 из 1
29.09.2004, 15:51
    #32717025
SergeyPl
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VFP 8 Read Events закрыть главное окно
Коллеги !
Есть такой вопрос - при использовании READ EVENTS
кнопка закрыть главного окна (x в правом верхнем углу)
программы недоступна. Это нормально.
Есть ли возможность увязать эту кнопку с выдачей команды
CLEAR EVETS ? Или где об этом почитать ?
...
Рейтинг: 0 / 0
29.09.2004, 15:56
    #32717044
ВладимирМ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VFP 8 Read Events закрыть главное окно
Приложение на базе As Top-Level форм или речь идет о главном окне FoxPro (_SCREEN)?
...
Рейтинг: 0 / 0
29.09.2004, 15:59
    #32717053
SergeyPl
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VFP 8 Read Events закрыть главное окно
ВладимирМПриложение на базе As Top-Level форм или речь идет о главном окне FoxPro (_SCREEN)?

О главном окне FoxPro (_SCREEN)
...
Рейтинг: 0 / 0
29.09.2004, 16:15
    #32717087
ВладимирМ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VFP 8 Read Events закрыть главное окно
Это "глюк", связанный с работой модальных форм. Если не ошибаюсь, этот крестик только кажется неактивным, но кликнуть по нему мышкой все-таки можно.

Принудительно активировать этот крестик можно примерно так:

_SCREEN.closable=.F.
_SCREEN.closable=.T.

Нажатие на этот крестик отлавливается через настройку

ON SHUTDOWN

Эта же самая настройка срабатывает по команде QUIT и при попытке закрытия приложения FoxPro через диспетчер задач (Ctrl+Alt+Del)

Т.е. на эту настройку навешивается вызов твоей процедуры, которая и должна осуществить штатный выход из приложения FoxPro. Причем эта процедура должна быть "видима" из любого места приложения.

ON SHUTDOWN Do ProcExit

PROCEDURE ProcExit
* Запрос на подтвередние выхода
* Штатное закрытие всех открытых форм
ON SHUTDOWN
CLEAR EVENTS
RETURN

Команда CLEAR EVENTS должна стоять здесь самой последней, поскольку она выполняет немедленный переход на команду, следующую за READ EVENTS и все что стоит в процедуре ProcExit за командой CLEAR EVENTS просто не будет выполнено!
...
Рейтинг: 0 / 0
29.09.2004, 16:22
    #32717119
SergeyPl
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VFP 8 Read Events закрыть главное окно
To ВладимирМ
СПАСИБО !!! Буду пробовать !!! Все понятно !!!
...
Рейтинг: 0 / 0
04.10.2004, 18:06
    #32722781
SergeyPl
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VFP 8 Read Events закрыть главное окно
To ВладимирМ
Работает отлично !!! Спасибо еще раз !!!
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / VFP 8 Read Events закрыть главное окно / 6 сообщений из 6, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]