Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Delphi: Общие вопросы > Закрыть форму и программно запустить процедуру


Автор: AlexSn 28.2.2005, 06:43
Мне нужно закрыть форму2 и передать управление процедуре на форме1, но чтоб эта процедура выполнялась после того, как форма2 уже закрылась!!
делаю так:
form2.Close;
form1.Ins; //ins - моя процедура
..но форма2 ещё не закрывается, а "Ins" уже выполняется!? (видимо из за того, что всё в одной процедуре)

Подскажите, как на одно нажатие кнопки выполнить: 1). Закрыть форму2;
2). Запустить мою процедуру на форме 1.

Автор: Dimich 28.2.2005, 08:47
Между form2.Close; и form1.Ins; поставить Application.ProcessMessages;

Автор: Snowy 28.2.2005, 10:58
Нужно просто форму2 показывать через Form2.ShowModal

Автор: Poseidon 1.3.2005, 02:26
А что, если при нажатии кнопки закрывать form2, а в процедуре TForm2.FormDestroy выполнять form1.Ins? Должно проити. smile

Автор: Girder 1.3.2005, 12:03
Если енто не главная форма, то можно так:
Код
form2.Close;
while IsWindowVisible(Form2.Handle) do Application.ProcessMessages;
form1.Ins;

Автор: 13 1.3.2005, 13:27
if Form2.ShowModal = mrOk then
Form1.Ins;

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)