Проблема с закрытием формы

← →
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-й строке.

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;

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

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