Закрытие проги после закрытия ПОСЛЕДНЕГО окна?

← →
IDL (2002-04-24 12:54) [0]

В проге при закрытии главной ( первой созданной) формы, программа завершается. А как сделать, чтобы она завершалась только после закрытия всех окон?
Желательно не создавать для этого главное окно скрытым.

← →
Song © (2002-04-24 12:58) [1]

Никак. После закрытия главной приложение будет всегда закрываться.
Вариант - скрывать главную форму и высвечивать все остальные.
TApplication.ShowMainForm

← →
Anatoly Podgoretsky © (2002-04-24 13:00) [2]

В событии OnCloseQuery ставишь CanClose := FALSE если есть хоть одна открытая форма, надеюсь ты именно о формах говоришь, а не об окнах, иначе твоя задача трудно разрешима.

← →
Deus © (2002-04-24 13:54) [3]

Ещё вариант: не делать главной формы.
т.е. в .dpr убрать application.run, а вставить цикл обработки сообщений.
И соответственно проверять на nil все формы....

← →
IDL (2002-04-24 14:02) [4]

Anatoly Podgoretsky
Да, я именно о формах и говорил.
CanClose не подходит - форма должна закрываться, раз ее просят :) но есть же и остальные, которые закрывать не надо.

Deus
У меня есть список всех форм в TList, можно попробовать и в цикле, но циклы = загрузке процессора :( Хотя может и нет - попробую.

← →
PaRL © (2002-04-24 14:06) [5]

Или можно просто сделать главной форму другую при обработке Close...

2IDL (24.04.02 14:02):
В dpr делаешь счётчик кол-ва форм. При уничожении формы этот счётчик умешьшается на 1 и проверяется на =0.

2PaRL © (24.04.02 14:06):
Это как?

← →
IDL (2002-04-24 16:04) [7]

Вроде работает.
repeat Sleep(50); Application.processMessages; until List.Count<=0;

Закрытие проги после закрытия ПОСЛЕДНЕГО окна? Найти похожие ветки