怎么实现从ListView控件拖放数据到Spread的单元格？

AccessZHB · AccessZHB

谢谢可以了

AccessZHB · AccessZHB

那如果一定要使用左键拖数据就不知道怎么办？

AccessZHB · AccessZHB

因为设计的是ListView拖到Spread 是用左键拖的为了保持统一使用左键拖。

AccessZHB · AccessZHB

这样能用左键进行拖拽数据了
Private Sub FpSpread1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles FpSpread1.MouseDown
      cr = FpSpread1.ActiveSheet.GetSelection(0)

      Dim hitInfo As FarPoint.Win.Spread.HitTestInformation = FpSpread1.HitTest(e.X, e.Y)
      If Not hitInfo.ViewportInfo Is Nothing Then
         If FpSpread1.ActiveSheet.ActiveRowIndex = hitInfo.ViewportInfo.Row AndAlso FpSpread1.ActiveSheet.ActiveColumnIndex = hitInfo.ViewportInfo.Column Then
            ' ドラッグアンドドロップ操作の効果を指定します。
            If e.Button = Windows.Forms.MouseButtons.Left Then
                  Try
                     FpSpread1.DoDragDrop(s, DragDropEffects.Copy Or DragDropEffects.Move)
                  Catch Exception As Exception
                  End Try
            End If
         End If
      End If

End Sub

roger.wang · roger.wang

回复 14楼AccessZHB的帖子

这个解决办法不错。

AccessZHB · AccessZHB

谢谢这办法是现成的只是应用了一下而已，主要还是受你的MouseDown事件的启发，我们要实现的是从ListView拖拽数据到Spread的时候，需要获取到Spread的当前活动的Sheet和Point：X,Y坐标的目的是使用坐标找到相应单元格。

AccessZHB · AccessZHB

并且要从Spread的单元格能拖数据到ListView

AccessZHB · AccessZHB

再罗嗦一句：有Spread的疑难问题还望超级版主多多关照！向您致敬

roger.wang · roger.wang

回复 18楼AccessZHB的帖子

客气客气，技术方面，彼此学习。

		自动登录	找回密码
密码			立即注册

[已处理] 怎么实现从ListView控件拖放数据到Spread的单元格？

活字格认证

微信认证勋章

元老葡萄