+ gTrackingGlobalsInstalled = true ;
+ }
+}
+
+pascal OSErr wxMacWindowDragTrackingHandler(DragTrackingMessage theMessage, WindowPtr theWindow,
+ void *handlerRefCon, DragReference theDrag)
+{
+ MacTrackingGlobals* trackingGlobals = (MacTrackingGlobals*) handlerRefCon;
+ Point mouse, localMouse;
+ DragAttributes attributes;
+ GetDragAttributes(theDrag, &attributes);
+ wxTopLevelWindowMac* toplevel = wxFindWinFromMacWindow( theWindow ) ;
+ switch(theMessage)
+ {
+ case kDragTrackingEnterHandler:
+ break;
+ case kDragTrackingLeaveHandler:
+ break;
+ case kDragTrackingEnterWindow:
+ trackingGlobals->m_currentTargetWindow = NULL ;
+ trackingGlobals->m_currentTarget = NULL ;
+ break;
+ case kDragTrackingInWindow:
+ if (toplevel == NULL)
+ break;
+
+ GetDragMouse(theDrag, &mouse, 0L);
+ localMouse = mouse;
+ GlobalToLocal(&localMouse);
+
+// if (attributes & kDragHasLeftSenderWindow)
+ {
+ wxPoint point(localMouse.h , localMouse.v) ;
+ wxWindow *win = NULL ;
+ toplevel->MacGetWindowFromPointSub( point , &win ) ;
+ int localx , localy ;
+ localx = localMouse.h ;
+ localy = localMouse.v ;
+ //TODO : should we use client coordinates
+ if ( win )
+ win->MacRootWindowToWindow( &localx , &localy ) ;
+ if ( win != trackingGlobals->m_currentTargetWindow )
+ {
+ if ( trackingGlobals->m_currentTargetWindow )
+ {
+ // this window is left
+ if ( trackingGlobals->m_currentTarget )
+ {
+ HideDragHilite(theDrag);
+ trackingGlobals->m_currentTarget->SetCurrentDrag( theDrag ) ;
+ trackingGlobals->m_currentTarget->OnLeave() ;
+ trackingGlobals->m_currentTarget = NULL;
+ trackingGlobals->m_currentTargetWindow = NULL ;
+ }
+ }
+ if ( win )
+ {
+ // this window is entered
+ trackingGlobals->m_currentTargetWindow = win ;
+ trackingGlobals->m_currentTarget = win->GetDropTarget() ;
+ if ( trackingGlobals->m_currentTarget )
+ {
+ trackingGlobals->m_currentTarget->SetCurrentDrag( theDrag ) ;
+ if ( trackingGlobals->m_currentTarget->OnEnter(
+ localx , localy , wxDragCopy ) != wxDragNone )
+ {
+ int x , y ;
+ x = y = 0 ;
+ win->MacWindowToRootWindow( &x , &y ) ;
+ RgnHandle hiliteRgn = NewRgn() ;
+ SetRectRgn( hiliteRgn , x , y , x+win->GetSize().x ,y+win->GetSize().y) ;
+ ShowDragHilite(theDrag, hiliteRgn, true);
+ DisposeRgn( hiliteRgn ) ;
+ }
+ }
+ }
+ }
+ else
+ {
+ if( trackingGlobals->m_currentTarget )
+ {
+ trackingGlobals->m_currentTarget->SetCurrentDrag( theDrag ) ;
+ trackingGlobals->m_currentTarget->OnDragOver(
+ localx , localy , wxDragCopy ) ;
+ }
+ }
+
+ }
+ // MyTrackItemUnderMouse(localMouse, theWindow);
+ break;
+ case kDragTrackingLeaveWindow:
+ if (trackingGlobals->m_currentTarget)
+ {
+ trackingGlobals->m_currentTarget->SetCurrentDrag( theDrag ) ;
+ trackingGlobals->m_currentTarget->OnLeave() ;
+ HideDragHilite(theDrag);
+ trackingGlobals->m_currentTarget = NULL ;
+ }
+ trackingGlobals->m_currentTargetWindow = NULL ;
+ break;
+ }
+ return(noErr);
+}
+
+pascal OSErr wxMacWindowDragReceiveHandler(WindowPtr theWindow, void *handlerRefCon,
+DragReference theDrag)
+{
+ MacTrackingGlobals* trackingGlobals = (MacTrackingGlobals*) handlerRefCon;
+ if ( trackingGlobals->m_currentTarget )
+ {
+ Point mouse,localMouse ;
+ int localx,localy ;
+
+ trackingGlobals->m_currentTarget->SetCurrentDrag( theDrag ) ;
+ GetDragMouse(theDrag, &mouse, 0L);
+ localMouse = mouse;
+ GlobalToLocal(&localMouse);
+ localx = localMouse.h ;
+ localy = localMouse.v ;
+ //TODO : should we use client coordinates
+ if ( trackingGlobals->m_currentTargetWindow )
+ trackingGlobals->m_currentTargetWindow->MacRootWindowToWindow( &localx , &localy ) ;
+ if ( trackingGlobals->m_currentTarget->OnDrop( localx , localy ) )
+ {
+ trackingGlobals->m_currentTarget->OnData( localx , localy , wxDragCopy ) ;
+ }
+ }
+ return(noErr);
+}