Código Delphi [-] procedure TForm3.FormResize(Sender: TObject); begin if IsIconic(Handle) then (Owner as TForm).WindowState := wsMinimized; end;
procedure TForm3.FormResize(Sender: TObject); begin if IsIconic(Handle) then (Owner as TForm).WindowState := wsMinimized; end;