 |
|
Модераторы: Poseidon, Snowy, bems, MetalFan |
 
|
|
Закрытие форм.. Delphi6 
| AlexSn |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 28 Регистрация: 2.7.2004 Репутация: нет Всего: нет |
Есть 2 формы. С Форм1 вызывается Форм2(модально!).
Нужно, чтобы при нажатии на системную кнопку Закрыть на Форм2 (справа вверху на форме), закрывальсь бы обе формы. В обработчике событий формы onClose нельзя закрывать Форм1, т.к. на форме2 есть созданная мной кнопка, в которой требуется закрывать только вторую форму(Form2.close;) Как решить эту проблеммку? |
|||
|
||||
Загрузка ...
| SoWa |
|
|||
 Харекришна  Профиль Группа: Комодератор Сообщений: 2422 Регистрация: 18.10.2004 Репутация: 2 Всего: 74 |
А так не работает(в OnClose)?:
Закроет все, что только найдет в программе! Это сообщение отредактировал(а) SoWa - 1.3.2005, 12:52 -------------------- Всем добра  |
|||
|
||||
| z-END |
|
|||
 прафесар™ Профиль Группа: Комодератор Сообщений: 3014 Регистрация: 13.3.2003 Где: Венья, Пиетари Репутация: 11 Всего: 102 |
процедура Форм1.Баттон1Клик (Отправитель: ТОбъект);
начало Форм2.ШоуМодал; Форм1.Клозе; конец; -------------------- Каждый чилавек пасвоему праф...а памоему НЕТ! |
|||
|
||||
| SoWa |
|
|||
|
Харекришна Профиль Группа: Комодератор Сообщений: 2422 Регистрация: 18.10.2004 Репутация: 2 Всего: 74 |
Но ведь AlexSn`y надо, чтобы по системной кнопке.
-------------------- Всем добра |
|||
|
||||
| Dr.No_xXx |
|
|||
|
Бывалый Профиль Группа: Участник Сообщений: 215 Регистрация: 24.2.2005 Репутация: нет Всего: нет |
application.terminate должно сработать
 |
|||
|
||||
| The MASTER |
|
|||
|
Old master) Профиль Группа: Участник Сообщений: 862 Регистрация: 19.7.2004 Где: Санкт-Петербург Репутация: 2 Всего: 5 |
По системной? Зайди на вкладку объекта формы там Events, там процеду onClose, туды пиши всё, что должно быть при вызови функции close!
|
|||
|
||||
|
|
| Правила форума "Delphi: Общие вопросы" | |
|
|
Запрещается! 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Delphi: Общие вопросы | Следующая тема » |
[ Время генерации скрипта: 0.0465 ] [ Использовано запросов: 22 ] [ GZIP включён ]
Реклама на сайте Информационное спонсорство
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |