 |
|
Модераторы: Poseidon, Snowy, bems, MetalFan |
 
|
|
Закрыть форму и программно запустить процедуру, Delphi6 
| AlexSn |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 28 Регистрация: 2.7.2004 Репутация: нет Всего: нет |
Мне нужно закрыть форму2 и передать управление процедуре на форме1, но чтоб эта процедура выполнялась после того, как форма2 уже закрылась!!
делаю так: form2.Close; form1.Ins; //ins - моя процедура ..но форма2 ещё не закрывается, а "Ins" уже выполняется!? (видимо из за того, что всё в одной процедуре) Подскажите, как на одно нажатие кнопки выполнить: 1). Закрыть форму2; 2). Запустить мою процедуру на форме 1. |
|||
|
||||
Загрузка ...
| Dimich |
|
|||
 Бывалый  Профиль Группа: Участник Сообщений: 247 Регистрация: 25.8.2004 Где: Брянск Репутация: 1 Всего: 7 |
Между form2.Close; и form1.Ins; поставить Application.ProcessMessages;
--------------------
Не работает - исправь, работает - не трогай!!! |
|||
|
||||
| Snowy |
|
|||
 Эксперт Профиль Группа: Модератор Сообщений: 11363 Регистрация: 13.10.2004 Где: Питер Репутация: 192 Всего: 484 |
Нужно просто форму2 показывать через Form2.ShowModal
|
|||
|
||||
| Poseidon |
|
|||
 Delphi developer Профиль Группа: Комодератор Сообщений: 5273 Регистрация: 4.2.2005 Где: Гомель, Беларусь Репутация: 53 Всего: 133 |
А что, если при нажатии кнопки закрывать form2, а в процедуре TForm2.FormDestroy выполнять form1.Ins? Должно проити.
 -------------------- Если хочешь, что бы что-то работало - используй написанное, если хочешь что-то понять - пиши сам... |
|||
|
||||
| Girder |
|
|||
 Лентяй 2 Профиль Группа: Участник Клуба Сообщений: 1993 Регистрация: 12.5.2004 Репутация: 31 Всего: 155 |
Если енто не главная форма, то можно так:
-------------------- Как слышим, так и пишим. Истина где-то там... |
|||
|
||||
| 13 |
|
|||
|
Unregistered |
if Form2.ShowModal = mrOk then
Form1.Ins; |
|||
|
||||
|
|
| Правила форума "Delphi: Общие вопросы" | |
|
|
Запрещается! 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Delphi: Общие вопросы | Следующая тема » |
[ Время генерации скрипта: 0.0655 ] [ Использовано запросов: 22 ] [ GZIP включён ]
Реклама на сайте Информационное спонсорство
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |