| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Вопрос про 2 формы...
Ultimate © (2008-02-27 16:19:00)У меня имеется 2 формы. При запуске программы запускается первая, которая включает тут-же вторую. Во второй форме есть некая функция (мол закрыть форму 2 и работать с формой 1, и закрыть форму 2 вместе с формой 1...) Так вот я использовал, что при закрытии (например) формы 2, должна закрыться форма 1, вывел команду:
procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Form1.Close;
end;
Но дело в том, что форма 1 "подвисает", её завершили до окончания действия... (Действие заключается в запуске формы 2 и ожидание завершения формы 2, для джальнейшего функционирования формы1).
Как можно воплотить закрытие обоих форм одновременно, без ошибок?
Chorniy (2008-02-27 16:47:00) [1]Ну какой вопрос такой и ответ) коль более нету подробных данных то тогда сделай так:
чтобы закрыть обе формы без ошибок надо просто закрыть форму1 ибо она является главной формой приложения, после чего форма2 закроется сама...
проще говоря так:
procedure TForm2.Button1Click(Sender: TObject); // закроются обе формы
begin
form1.close;
end;
procedure TForm2.Button2Click(Sender: TObject); // закроется только форма2
begin
form2.close;
end;
Ultimate (2008-02-27 16:35:00) [2]Или хотя бы скажите, как некоторые данные отправить с формы 2 на форму 1???
| |
