Question

Delphi中如何使父窗体弹出一个子窗体，而子窗体无论状态如何。父窗体都可以输入数据，直到关闭子窗体?

Delphi中如何使父窗体弹出一个子窗体，而子窗体无论状态如何。父窗体都可以输入数据，直到关闭子窗体或者关闭父窗体？

Answer 1

if assigned(childFrm) then
parentFrm可以输入
else
parentFrm不可以输入

//在childfrm.close事件时加入 action=cafree
childfrm.destroy事件加入 childfrm:= nil;

Answer 2

Form1 := TForm1.Create(父窗体) ;
Form1.Show;
Form1.BringToFront