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

Вниз

Как закрыть все окна приложения?   Найти похожие ветки 

 
Mars   (2005-05-31 11:22) [0]

Может сообщение какое есть?


 
Игорь Шевченко ©   (2005-05-31 11:28) [1]

WM_SYSCOMMAND + SC_CLOSE главному окну ?


 
Anatoly Podgoretsky ©   (2005-05-31 11:28) [2]

MainForm.Close
Application.Terminate


 
Mars   (2005-05-31 11:45) [3]

не, это ведь все приложение закроет, а надо чтобы
главная форма осталась


 
Игорь Шевченко ©   (2005-05-31 11:47) [4]


> а надо чтобы
> главная форма осталась


Вопрос формулируй нормально


 
Mars   (2005-05-31 12:40) [5]

>>Игорь Шевченко
...так ведь спрашивал, как закрыть окна, а не приложние

Так есть какое нибудь сообщение для этих целей,
чтобы осталось только главное окно?


 
Игорь Шевченко ©   (2005-05-31 12:43) [6]


> Так есть какое нибудь сообщение для этих целей,
> чтобы осталось только главное окно?


Нету.


 
злобная танька   (2005-05-31 12:48) [7]

прогони в цикле Application.Components.
Если is TForm и <> MainForm тады закрывай!


 
Digitman ©   (2005-05-31 12:49) [8]


> чтобы осталось только главное окно


как только найдешь четкое определение "главного окна" - сразу все вопросы отпадут


 
Digitman ©   (2005-05-31 12:50) [9]


> злобная танька   (31.05.05 12:48) [7]
> и <> MainForm


и чем MainForm провинилась ?
она что, не имеет окна по-твоему ?


 
Anatoly Podgoretsky ©   (2005-05-31 12:54) [10]

Mars   (31.05.05 11:45) [3]
Что просил, то и получил. Отсюда вывод просить нужно только нужное.


 
злобная танька   (2005-05-31 12:57) [11]

> Digitman ©   (31.05.05 12:50) [9]
я вас не вполне понимаю, но как просил автор,

> надо чтобы
> главная форма осталась


вот я и тово..


 
Mars   (2005-05-31 12:58) [12]

>>злобная танька   (31.05.05 12:48) [7]
>>прогони в цикле Application.Components.
>>Если is TForm и <> MainForm тады закрывай!

Спасибо! Получилось.


 
злобная танька   (2005-05-31 13:03) [13]

пожабо! :D


 
KilkennyCat ©   (2005-05-31 13:27) [14]

а у меня пишет, что MainForm несуществует :(


 
Просто Джо ©   (2005-05-31 13:39) [15]


> [14] KilkennyCat ©   (31.05.05 13:27)
> а у меня пишет, что MainForm несуществует :(

Уметь надо (ц) :))


 
Digitman ©   (2005-05-31 13:51) [16]


> злобная танька   (31.05.05 12:57) [11]
> я вас не вполне понимаю, но как просил автор


автор просил "чтобы осталось только главное окно" (см.[5])

MainForm же не есть "главное окно".

а то что автор не видит разницы между "главным окном приложения" и "основной формой" - это его личная драма)


 
злобная танька   (2005-05-31 13:59) [17]


> Digitman ©   (31.05.05 13:51) [16]

гм, я вот тоже не вижу. наверное поэтому мы поняли друг друга. а в чем она, разница-то?


 
Anatoly Podgoretsky ©   (2005-05-31 13:59) [18]

Вообще то автор просил все окна приложения, это включает в себя и главное окно приложения.


 
Digitman ©   (2005-05-31 14:03) [19]


> злобная танька   (31.05.05 13:59) [17]


в том что главное окно создается объектом Application еще ДО создания главной формы (если она вообще есть), это окно невизуальное, не имеет никакого отношения к главной форме и создается всегда в ходе создания объекта Application (при IsLibrary = False), ВНЕ зависимости от того, есть ли хотя бы одна форма в приложении или нет ни одной.


 
Mars   (2005-05-31 14:13) [20]

ну че вы с пустого в порожнее переливаете?
все получилось!

хотите обсудить, вот вам процедура:

for n:=0 to Application.ComponentCount-1
do begin
   if (Application.Components[n] is TForm)
   and(Application.Components[n].Name <> "ОСНОВНАЯ_ФОРМА")
   and((Application.Components[n] as TForm).Visible)
   then (Application.Components[n] as TForm).Close;
  end;


 
Digitman ©   (2005-05-31 14:16) [21]


> Mars   (31.05.05 14:13) [20]


объект-компонент-форма не обязан иметь владельцем объект Application


 
Юрий Зотов ©   (2005-05-31 14:31) [22]

> and(Application.Components[n].Name <> "ОСНОВНАЯ_ФОРМА")

Это шедевр.


 
KilkennyCat ©   (2005-05-31 14:34) [23]

В общем, смысл следующий: приложение вообще не знает сколько у него окон. Безответственное приложение :)


 
Anatoly Podgoretsky ©   (2005-05-31 14:56) [24]

Вообще то приложение четко знает сколько у него создано форм. Насчет окон конечно не знает.



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

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

Наверх




Память: 0.49 MB
Время: 0.046 c
1-1117051608
SergP
2005-05-26 00:06
2005.06.14
Как узнать положение компонента относительно десктопа


3-1115793250
julia
2005-05-11 10:34
2005.06.14
сравнение значений в checklistbox со значениями бд


14-1117085089
Ozone
2005-05-26 09:24
2005.06.14
Построение грамматик (задолбали заочники)


8-1108553563
cuppykx
2005-02-16 14:32
2005.06.14
Пиксели цифровой камеры


14-1116491813
Skier
2005-05-19 12:36
2005.06.14
Опять новая концепция развития нашего автопрома...





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский