handler_handle_drag Subroutine

private subroutine handler_handle_drag(self, window, handle, stage)

A handle (vkf_handles) was grabbed (DRAG_START), dragged (DRAG_MOVE: it has moved) or released (DRAG_END) with the mouse: e.g. compute again what depends on it (see the module documentation).

Type Bound

WindowEventHandler

Arguments

Type IntentOptional Attributes Name
class(WindowEventHandler), intent(inout) :: self
class(WindowProxy), intent(inout) :: window

the window the handle is dragged in
class(DragHandle), intent(inout), target :: handle

the handle (select type for its kind)
integer, intent(in) :: stage

DRAG_START, DRAG_MOVE or DRAG_END

Called by

proc~~handler_handle_drag~~CalledByGraph proc~handler_handle_drag WindowEventHandler%handler_handle_drag proc~drag_handle drag_handle proc~drag_handle->proc~handler_handle_drag proc~grab_handle grab_handle proc~grab_handle->proc~handler_handle_drag proc~release_handle release_handle proc~release_handle->proc~handler_handle_drag proc~dispatch_event dispatch_event proc~dispatch_event->proc~drag_handle proc~dispatch_event->proc~grab_handle proc~dispatch_event->proc~release_handle proc~dispatch_events dispatch_events proc~dispatch_events->proc~dispatch_event proc~frame WindowProxy%frame proc~frame->proc~dispatch_events proc~resize WindowProxy%resize proc~resize->proc~frame proc~run WindowProxy%run proc~run->proc~frame

Source Code

    subroutine handler_handle_drag(self, window, handle, stage)
        class(WindowEventHandler), intent(inout) :: self
        class(WindowProxy), intent(inout) :: window         !! the window the handle is dragged in
        class(DragHandle), intent(inout), target :: handle  !! the handle (select type for its kind)
        integer, intent(in) :: stage                        !! DRAG_START, DRAG_MOVE or DRAG_END
    end subroutine handler_handle_drag