anchor.diff:          begin
             {$IFDEF DEBUG}
             if uMsg <> WM_MOUSEMOVE then
  -            writeln('fpGFX/GDI: Found a mouse button event');
  +            SendDebug('fpGFX/GDI: Found a mouse button event');
             {$ENDIF}
   //          msgp.mouse.x := smallint(lParam and $FFFF);
   //          msgp.mouse.y := smallint((lParam and $FFFF0000) shr 16);
  
positive.code:     WM_NCACTIVATE:
          begin
            {$IFDEF DEBUG}
              write(w.ClassName + ': WM_NCACTIVATE ');
              writeln(wParam);
            {$ENDIF}
            if (wParam = 0) then
              fpgSendMessage(nil, w, FPGM_DEACTIVATE)
  
negative.code:               WM_RBUTTONDOWN:
                    begin
                      {$IFDEF DEBUG}
                      SendDebug('fpGUI/GDI: ' + w.ClassName + ': MouseButtonDown event');
                      {$ENDIF}
                      // This is temporary and we should try and move it to
                      // the UI Designer code instead.
  