powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / QueryUnload
4 сообщений из 4, страница 1 из 1
QueryUnload
    #32704924
xamlo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Народ, а правильно ли я делаю? Мне нужно всего лишь предложить вопрос при закрытие формы через крестик (закрывать или нет). Что нужно написать, чтобы форма не закрылась?

Пишу в QueryUnload формы:

w= MESSAGEBOX(Выйти из программы?',1,'Выход')
IF w = 1 THEN
thisform.Release
ENDIF
IF w = 2 THEN
<Что можно написать сюда, чтобы форма не закрылась>
ENDIF
...
Рейтинг: 0 / 0
QueryUnload
    #32704939
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
w= MESSAGEBOX(Выйти из программы?',1,'Выход')
IF w = 1 THEN
thisform.Release
ENDIF
IF w = 2 THEN
NODEFAULT
ENDIF
...
Рейтинг: 0 / 0
QueryUnload
    #32704980
xamlo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Спасибо. С'est.
...
Рейтинг: 0 / 0
QueryUnload
    #32705382
Igor Korolyov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ThisForm.release() там не нужен, и без него закроется.

Posted via ActualForum NNTP Server 1.0
...
Рейтинг: 0 / 0
4 сообщений из 4, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / QueryUnload
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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