Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.05.09;
Скачать: [xml.tar.bz2];

Вниз

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

 
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...



 
Deus   (2002-04-24 14:14) [6]

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;




Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2002.05.09;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.005 c
14-26249
lel
2002-04-01 11:19
2002.05.09
Оцените, выскажите оценку, моя большая просьба 8))


6-26216
cypher
2002-02-17 23:54
2002.05.09
Конкетный вопрос


3-25997
viru$
2002-04-15 17:17
2002.05.09
Проблемка с IBEvents


3-26008
Art1
2002-04-15 18:54
2002.05.09
Как позиционировать данные в DBGrid?


14-26228
-=CrazyFish=-
2002-04-01 10:53
2002.05.09
color





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский