Чтобы окончательно закрыть форму, нужно писать Form1.Close
Если закрыть Form1 (учитывая что она главная) закроется все приложение. Вот Form2 можно закрывать/открывать:
Application.CreateForm(TForm2, Form2);
Form2.Close;
________________
В любом из нас спит гений. И с каждым днем все крепче.
Запомните раз и навсегда:= 'Помочь' <> 'Сделайте за меня';
Вижу тема устарела но внесу свою лепту
Када я учился мы писали небольшую процедурку для того чтобы создавать форму. Применялось при создании SDI приложений, тоесть состоящее из двух форм (окон): главного и подчиненного. Причем при вызове подчиненого главное становилось недоступным, есть свои плюсы и минусы...
Итак вот код:
Код:
procedure TForm1.ShowForm(AFormClass: TFormClass);
begin
with AFormClass.Create(Self) do
try
{попытка создания окна}
ShowModal;
finally
{при неудачное попытке освобождаем память, возможно выдать сообщение}
Free;
end;
end;
И в обработчике клика кнопки писали:
Код:
ShowForm(Имя вспомогательной кнопки);
С помощью пункта Project\Options уберем новую форму из списка автоматически создаваемых форм (Auto-create forms).
P.S. Если мы назвали вторую форму fmSecond то в обработчике надо писать ТfmSecond.
И еще: для того чтобы две наши формы видели друг друга, необходимо в разделе Uses модуля главной формы подключить модуль подчиненной формы. А в разделе implementation модуля подчиненной формы создать раздел Uses и подключить в нем модуль главной формы.
________________
Если хочеца работать - ляг, поспи, и всё пройдет !