![]() |
|
#1
|
|||
|
|||
![]() Доброго времени суток, у меня такой вопрос как сделать переключение между двумя формами что бы одна закрывалась, а вызванная стала главной.
Просто я использую способ который только скрывает формы... |
#2
|
|||
|
|||
![]() Form.Destroy;
|
#3
|
||||
|
||||
![]() Код:
procedure TForm1.Button1Click(Sender: TObject); begin Form2:= TForm2.Create(Application); Form2.Show; Self.Destroy; end; ... procedure TForm2.Button1Click(Sender: TObject); begin Form1:= TForm1.Create(Application); Form1.Show; Self.Destroy; end; Последний раз редактировалось Ildar-tsr, 12.05.2012 в 20:25. |
#4
|
|||
|
|||
![]() Цитата:
Код:
Application.Terminate; |
#5
|
||||
|
||||
![]() Деструкторы не желательно напрямую вызывать, есть метод Free.
|