我的代码如下:
try
inherited;
formEditGYSJBZL := TformEditGYSJBZL.Create(Application);
formEditGYSJBZL.Show;
finally
formEditGYSJBZL.Free;
end;
现在有几个问题:
1,如果用了formEditGYSJBZL.Free,新窗体闪一下就消失了,
2,不用的话,新窗体在关闭时会出错,我的新窗体用于插入新纪录或者修改主窗体的一条记录
请大家指教,谢谢!
try
inherited;
formEditGYSJBZL := TformEditGYSJBZL.Create(Application);
formEditGYSJBZL.Show;
finally
formEditGYSJBZL.Free;
end;
现在有几个问题:
1,如果用了formEditGYSJBZL.Free,新窗体闪一下就消失了,
2,不用的话,新窗体在关闭时会出错,我的新窗体用于插入新纪录或者修改主窗体的一条记录
请大家指教,谢谢!
调窗体用,uses 窗体单元var
formEditGYSJBZL:=TformEditGYSJBZL.creat(self);
formeditgysjbzl.show;
inherited;
formEditGYSJBZL := TformEditGYSJBZL.Create(Application);
formEditGYSJBZL.ShowModal;
finally
formEditGYSJBZL.Free;
end;
inherited;
formEditGYSJBZL := TformEditGYSJBZL.Create(Application);
formEditGYSJBZL.ShowModal;
finally
formEditGYSJBZL.close;
end;