The grabbed handle released at (x, y); then the handle under the cursor hovered.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(WindowProxy), | intent(inout), | target | :: | self | ||
| real(kind=wp), | intent(in) | :: | x |
the cursor: -1 to 1 across the window, y up |
||
| real(kind=wp), | intent(in) | :: | y |
the cursor: -1 to 1 across the window, y up |
subroutine release_handle(self, x, y) class(WindowProxy), intent(inout), target :: self real(wp), intent(in) :: x, y !! the cursor: -1 to 1 across the window, y up class(DragHandle), pointer :: released if (associated(self%dragged_handle)) then released => self%dragged_handle self%dragged_handle => null() call released%release() if (associated(self%handler)) call self%handler%handle_drag(self, released, DRAG_END) end if if (self%is_open()) call hover_handle(self, x, y) end subroutine release_handle