Модераторы: Poseidon, Snowy, bems, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> MDIChildCount не равно 0!!! Закрываем все MDIChildren 
:(
    Опции темы
rOOxus
Дата 23.4.2009, 21:02 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Awaiting Authorisation
Сообщений: 95
Регистрация: 28.8.2006

Репутация: нет
Всего: нет



здравствуйте коллеги!
закрываю все MDIChildren-ы, а потом хочу проверить, все ль закрыты?
Код

procedure TMainForm.CloseAllMDIChildren;
var
   i : Integer;
begin
   // закрываем
   for i := 0 to MDIChildCount - 1 do
   begin
      MDIChildren[i].Close;
   end;

   // проверяем
   if MDIChildCount = 0 then
   begin
      // что-то делаем если все закрылись
   end
end;

так вот злая шутка состоит в том что MDIChildCount стане равным нулю при успешном закрытии всех дочерних окон только поле выполнения процедуры. т.е. внутри процедуры оно останеться равным тому числу окно, которое было до выполнения процедуры.
как быть?
PM MAIL   Вверх
volvo877
Дата 23.4.2009, 21:39 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Комодератор
Сообщений: 2073
Регистрация: 15.11.2004

Репутация: 14
Всего: 116



Цитата(rOOxus @  23.4.2009,  21:02 Найти цитируемый пост)
как быть? 
Попробовать заставить приложение обработать очередь сообщений?
Код
   Application.ProcessMessages;
   // и только теперь - проверяем
   if MDIChildCount = 0 then
   begin
      // что-то делаем если все закрылись
   end

PM MAIL   Вверх
rOOxus
Дата 23.4.2009, 22:05 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Awaiting Authorisation
Сообщений: 95
Регистрация: 28.8.2006

Репутация: нет
Всего: нет



точно! это ж я им посути сообщения WM_CLOSE посылаю  smile 
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »


 




[ Время генерации скрипта: 0.0443 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.