Скачать: CL | DM;

Проблема с закрытием формы   Найти похожие ветки 

← →
mefodiy   (2011-04-10 20:19) [0]

Есть главная форма, из которой вызывается дочерняя, из которой своя дочерняя.
При закрытии последней формы закрывается и вторая. Манипуляции с KeyPreview и ModalResult форм ни к чему ни привели. В чем может проблема?
Заранее благодарен.

---

← →
Palladin ©   (2011-04-10 20:34) [1]

что значит дочерняя?

---

← →
mefodiy   (2011-04-10 20:45) [2]

Имею в виду вызов формы командой ShowModal.

---

← →
Германн ©   (2011-04-10 21:04) [3]

> При закрытии последней формы закрывается и вторая.

Ошибка в 17-й строке.

---

← →
Palladin ©   (2011-04-10 21:04) [4]

procedure TForm1.Button1Click(Sender: TObject);
var
 f: TForm;
 b: TButton;
begin
 f := TForm.Create(Application);
 try
   f.Width := 200;
   f.Height := 200;
   b := TButton.Create(f);
   b.Caption := "click";
   b.OnClick := Button1Click;
   b.Parent := f;
   f.ShowModal;
 finally
   f.Free;
 end;
end;


ничего не закрывается кроме закрываемой... кто знает, кроме оракулов, где партизанят партизаны...

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.006 c