2

我想在我的应用程序中实现拖动滚动功能，但在路上遇到了问题。有谁能够帮我？我有一个 ScrollViewer，其中有一个 ItemsControl，在 ItemsTemplate 中有一个 UserControl。我想在 ItemsControl 中拖动那个 UserControl。当我拖动到 ItemsControl 的边界时，我希望 ScrollViewer 向下滚动。

protected override void OnPreviewMouseMove(System.Windows.Input.MouseEventArgs e)
{
    if (this.IsMouseCaptured)
    {
        // Get the new mouse position. 
        Point mouseDragCurrentPoint = e.GetPosition(this);

        if (Math.Abs(mouseDragCurrentPoint.Y - this.ActualHeight) <= 50)
        {
            this._scrollStartOffset.Y += 5;
            _containingScrollViewer.ScrollToVerticalOffset(this._scrollStartOffset.Y);
        }
        if (mouseDragCurrentPoint.Y <= 50)
        {
            this._scrollStartOffset.Y -= 5;
            _containingScrollViewer.ScrollToVerticalOffset(this._scrollStartOffset.Y);
        }
    }
    base.OnPreviewMouseMove(e);
}

当我通过调用DragDrop.DoDragDrop()滚动开始拖动时不会发生。但是当我禁用拖动时，ScrollViewer 会根据鼠标位置向下滚动。也许有一些我不考虑拖动和捕获鼠标的事情？感谢关注。加雷金

4

1 回答 1

5

使用 DragDrop.DoDragDrop() 时，我使用了一个处理 Me.DragOver 事件的 Sub（在 VB 中），因此它看起来如下所示。请注意，我的控件有一个包含在 ScrollViewer 中的 ListBox。

Private Sub ListBox_Items_DragOver(ByVal sender As System.Object, ByVal e As System.Windows.DragEventArgs) Handles Me.DragOver
        Dim currentMousePoint As Point = e.GetPosition(_containtingScrollViewer)
        If Math.Abs(currentMousePoint.Y - _containtingScrollViewer.ActualHeight) <= 50 Then
            _containtingScrollViewer.ScrollToVerticalOffset(currentMousePoint.Y + 5)
        End If
        If currentMousePoint.Y <= 50 Then
            _containtingScrollViewer.ScrollToVerticalOffset(currentMousePoint.Y - 5)
        End If
End Sub

这使我能够在拖动项目时滚动。您可以根据需要调整公差以获得更好/更平滑的滚动。

于 2009-10-07T12:58:04.867 回答