D
dabaosod
Unregistered / Unconfirmed
GUEST, unregistred user!
我有一个工程,主窗口是MDIForm,子窗口是ChildForm,还有一些NormalForm风格的窗口,
其中ChildForm的关闭事件是:
procedure TMDIChild.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Action := caFree;
end;
当运行ChildForm风格的窗口,再运行NormalForm风格的窗口后,系统又重新激活主窗口,
要求重新登录。如果只运行ChildForm风格的窗口或NormalForm风格的窗口,就没有上述的
问题。
不知道是什么原因,请求你的帮助!!!谢谢!!!
其中ChildForm的关闭事件是:
procedure TMDIChild.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Action := caFree;
end;
当运行ChildForm风格的窗口,再运行NormalForm风格的窗口后,系统又重新激活主窗口,
要求重新登录。如果只运行ChildForm风格的窗口或NormalForm风格的窗口,就没有上述的
问题。
不知道是什么原因,请求你的帮助!!!谢谢!!!