-Поиск по дневнику

Поиск сообщений в rss_sql_ru_access_programming

 -Подписка по e-mail

 

 -Постоянные читатели

 -Статистика

Статистика LiveInternet.ru: показано количество хитов и посетителей
Создан: 16.03.2006
Записей:
Комментариев:
Написано: 4


Закрытие формы при помощи API

Среда, 25 Июля 2018 г. 12:46 + в цитатник
Закрыть форму можно двумя способами.

1. Нажать на кнопку с "Х" в меню формы
2. Выполнить команду VBA по закрытию формы

При закрытии формы последовательно происходят два события Unload и Close. Событие Unload имеет параметр Cancel типа Integer. Если в процессе выполнения кода, расположенного в секции Private Sub Form_Unload(Cancel As Integer) присвоить переменной Cancel значение True, то процедура закрытия формы будет прервана. Если же оставить переменной Cancel значение False, то закрытие формы будет продолжено.

Но можно закрыть форму и при помощи API. Вот так
'Разместите на форме CommandButton и вставьте следующий код:
	Private Declare Function DestroyWindow Lib "user32" (ByVal hwnd As Long) As Long


	Private Sub Command_Click()
              DestroyWindow Me.hwnd
	End Sub
При этом события Unload не происходит, а сразу выполняется событие Close. Что думаете о таком способе закрытия формы? И на сколько он корректен?
-------------------------------------------------------------
А ты вложил уже свой кровный рубль в 50-ти миллиардное состояние Билла Гейтса?

http://www.sql.ru/forum/1299549/zakrytie-formy-pri-pomoshhi-api


 

Добавить комментарий:
Текст комментария: смайлики

Проверка орфографии: (найти ошибки)

Прикрепить картинку:

 Переводить URL в ссылку
 Подписаться на комментарии
 Подписать картинку