Помогите, пожалуйста в решении следующей на первый взгляд простой проблемы. Для демонстрации ее сути создал простенькое приложение. Есть главная форма MainForm (fsMDIForm), в которой можна создавать дочерние формы ChildForm (fsMDIChild). При закрытии отдельно взятой дочерней формы в обработчике события OnCloseQuery у пользователя спрашивается, закрывать ли эту дочернюю форму или оставить открытой. При закрытии главной формы сначала запускаются по очереди обработчики события OnCloseQuery для всех дочерних окон, спрашивают, закрывать ли соответствующее дочернее окно и только в случае подтверждения закрытия ВСЕХ дочерних окон дочерние окна по очереди закрываются, после чего зарывается главная форма. Если же пользователь подтвердил, например, закрытия первых двох дочерних форм, а для третьей нажал "Нет", то ничего не закроется и все три дочерние формы останутся открытыми, что явно не логично. 

На сколько я понял, то при закрытии главной формы события разворачиваются так:
1) срабатывают по очереди OnCloseQuery дочерних окон;
2) если после всех OnCloseQuery дочерних окон переменная CanClose остается true, то срабатывает OnCloseQuery главного окна;
3) если и после этого CanClose == true, то срабатывает событие OnClose ГЛАВНОЙ ФОРМЫ, событие же OnClose дочерних окон при этом не срабатывают.

Мне же нужна следующая ситуация: 
1) при закрытии главной формы для каждой дочерней формы спрашивается разрешение на ее закрытие;
2) если для даной дочерней формы пользователь подтвердил закрытие, она сразу закрывается;
3) если пользователь запретил закрытие дочерней формы, то больше ничего не закрывается вообще.
По-моему так выглядит логично. Я пробовал в обработчике OnCloseQuery дочерней формы в случае подтверждения закрытия сразу закрывать дочернюю форму, но вылазит ошибка. На сколько я понимаю, пока при попытке закрытия главной формы не будут опрошены все дочерние формы закрывать дочерние формы нельзя. Так ли это? И как быть? Думаю не я первый с таким столкнулся.

Заранее благодарен за советы 

ПС. Код главной формы:



Код дочерней формы:



Проект прикреплен к теме.

Это сообщение отредактировал(а) NightWishMaster - 21.7.2008, 16:15

Присоединённый файл ( Кол-во скачиваний: 5 )
 Project.zip 46,78 Kb

Дочерние формы не получают события OnClose. Нужно вызывать вручную.

Это сообщение отредактировал(а) Rrader - 21.7.2008, 17:53

Я это понимаю. Откуда их вызывать - вот в чем вопрос.

А может кто подскажет, как отловить событие, когда пользователь выбирает команду "Закрыть" для главной формы (т.е. щелкает на крестик). Дело в том, что сразу после этого вначале идут события OnCloseQuery дочерних окон и только после этого OnCloseQuery главной формы. А мне хотелось бы в событиях OnCloseQuery дочерних форм отличить, вызвано оно в результате закрытия пользователем конкретно этой формы или же главной формы. В таком случае можно было бы в событиях OnCloseQuery дочерних форм, если они вызваны при закрытии главной формы, проигнорировать их код, а в событии OnCloseQuery главной формы вызвать поочереди для всех дочерних форм метод Close() и после его вызова для каждой формы проверять - закрылась ли форма. Если нет, то CanClose = false и песенка спета 

Проблему решил, отказавшись от использования события OnCloseQuery дочерних форм.
Вот код, все работает, как и должно:

Главная форма:



Дочерняя форма:



Проект прикреплен.

Это сообщение отредактировал(а) NightWishMaster - 22.7.2008, 14:06

Присоединённый файл ( Кол-во скачиваний: 9 )
 CloseMDIFormProject.zip 47,65 Kb