Перейти к содержанию
СофтФорум - всё о компьютерах и не только

Закрыть форму...


Рекомендуемые сообщения

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

делаю так:

form2.Close;

form1.Ins; //ins - моя процедура

..но форма2 ещё не закрывается, а "Ins" уже выполняется!? (видимо из за того, что всё в одной процедуре)

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

2). Запустить мою процедуру на форме 1.

Ссылка на комментарий
Поделиться на другие сайты

Попробуй визват процедуро Ins в собитие onClose форме. Да и на всякий случай провер в процедуре существует ли форма 2. Может бит тебе будет необходим таймер что проследит когда Form2 перестала существоват и тогда виполнит процедуру

Ссылка на комментарий
Поделиться на другие сайты

Через событие onClose не получится, т.к. Ins нужно вызывать только по нажатию необходимой кнопки, а не на всё onClose.

А на счёт таймера - подскажи пожалуйста поконкретней!! Чтоб при нажатии кнопки он следил, когда форма перестанет существовать и тогда передалось управление процедуре Ins.

Заранее благодарен!!

Ссылка на комментарий
Поделиться на другие сайты

Вызывай форму при помощи ShowModal примерно таким макаром:

procedure TForm1.Button1OnClick(Sender:TObject);begin Form2.Tag:=0; Form2.ShowModal; If Form2.Tag=1 then Ins;end;

У кнопки на форме 2 делай примерно такой код:

procedure TForm2.Button1OnClick(Sender:TObject);begin Tag:=1; Close;end;
Ссылка на комментарий
Поделиться на другие сайты

А если форма не модальная... лучше :

procedure TForm2.Button1OnClick(Sender:TObject);beginFrom1.Timer1.enabled:=true;Close;end;

а в собитие onTimer:

if Assigned(Form2) thenInselseTimer1.enabled=trueend;

К сожеленю Delphi у меня сейчаш се установлен чтоби написах несколько примера

Ссылка на комментарий
Поделиться на другие сайты

Присоединяйтесь к обсуждению

Вы можете написать сейчас и зарегистрироваться позже. Если у вас есть аккаунт, авторизуйтесь, чтобы опубликовать от имени своего аккаунта.

Гость
Ответить в этой теме...

×   Вставлено с форматированием.   Вставить как обычный текст

  Разрешено использовать не более 75 эмодзи.

×   Ваша ссылка была автоматически встроена.   Отображать как обычную ссылку

×   Ваш предыдущий контент был восстановлен.   Очистить редактор

×   Вы не можете вставлять изображения напрямую. Загружайте или вставляйте изображения по ссылке.

  • Последние посетители   0 пользователей онлайн

    • Ни одного зарегистрированного пользователя не просматривает данную страницу
×
×
  • Создать...