anchor.diff:  begin
     if FWinHandle > 0 then
       Exit; //==>
  +    
  +  FSkipResizeMessage := True;
   
     FWinStyle   := WS_OVERLAPPEDWINDOW;
     FWinStyleEx := WS_EX_APPWINDOW;
  
positive.code: 
      WM_SIZE:
          begin
            // note that WM_SIZING allows some control on sizeing
            //writeln('WM_SIZE: wp=',IntToHex(wparam,8), ' lp=',IntToHex(lparam,8));
            msgp.rect.Width  := smallint(lParam and $FFFF);
  
negative.code:     FNonFullscreenRect: TfpgRect;
      FNonFullscreenStyle: longword;
      FFullscreenIsSet: boolean;
      FSkipResizeMessage: boolean;
      function    DoMouseEnterLeaveCheck(AWindow: TfpgWindowImpl; uMsg, wParam, lParam: Cardinal): Boolean;
      procedure   WindowSetFullscreen(aFullScreen, aUpdate: boolean);
    protected
  