anchor.diff:            else
               Windows.DefWindowProc(hwnd, uMsg, wParam, lParam);
           end;
  -
  +(*
       WM_LBUTTONDBLCLK:
           begin
             {$IFDEF DEBUG}
             writeln('fpGFX/GDI:', w.ClassName + ': MouseButton DoubleClick event');
             {$ENDIF}
           end;
  -
  +*)
  +
  +    WM_LBUTTONDBLCLK,
       WM_MOUSEMOVE,
       WM_LBUTTONDOWN,
       WM_LBUTTONUP,
  
positive.code:             case uMsg of
                WM_MOUSEMOVE:
                    mcode := FPGM_MOUSEMOVE;
                    
                WM_LBUTTONDOWN,
                WM_MBUTTONDOWN,
                WM_RBUTTONDOWN:
  
negative.code:                 msgp.mouse.Buttons := i;
                end;
  
                WM_LBUTTONDBLCLK,
                WM_LBUTTONDOWN,
                WM_LBUTTONUP:
                    msgp.mouse.Buttons := MOUSE_LEFT;
  