让人搞不明白？什么原因？

Question

我现在做的MID窗口父窗体调用子窗体时我用   
if application.FindComponent('表单')<>nil then
 表单.WindowState:=wsnormal
 else
 begin
 表单:=tfrmgys.Create(application);
 表单.show;
 end;
关闭时用action:=cafree;
可现在程序速度运行慢的要命！可我以前不用MID 窗口时速度很快呀！这到底是怎么回事！不知大家知道不。或有其他的方法吗？

Answer 1

if application.FindComponent('表单')<>nil then  //这句影响速度
你应该这样做
if assigned（表单） then
表单.WindowState:=wsnormal
 else
 begin
 表单:=tfrmgys.Create(application);
 表单.show;
 end;