Delphi编程时最小化时出现如下图怎么解决

Delphi编程时最小化时出现如下图如何解决
Delphi编程时最小化时出现如下图如何解决

下面这个图，有时出现，有时也不出现的

我在这个地方设置了

procedure TMainForm.FormResize(Sender: TObject);
begin
 if  self.WindowState = wsMinimized then
  begin

  end;
end;

不知如何设置，还请各位多多赐教
------解决方案--------------------
你这个窗口是子窗口吧？
------解决方案--------------------
是主窗口还是子窗口？
------解决方案--------------------
好像子窗口才会这样吧。。
------解决方案--------------------
此窗体不是主窗体，鉴定完毕
------解决方案--------------------
嘻嘻。。
------解决方案--------------------