jj 06.10 diagram

This commit is contained in:
JenneJ
2016-10-06 16:00:04 +02:00
parent cebb7cd0f2
commit 4ac94522d7
12 changed files with 396 additions and 67 deletions

View File

@@ -5174,7 +5174,8 @@ Public Class frmConstructor_Main
End If
End Sub
Private Sub grvwGrid_MouseDown(sender As Object, e As MouseEventArgs) Handles grvwGrid.MouseDown, grvwTiles.MouseDown, grvwCarousel.MouseDown
Dim view As GridView = CType(sender, GridView)
Dim view As BaseView = CType(sender, BaseView)
If e.Button = Windows.Forms.MouseButtons.Right Then
GRIDRightMouse_Clicked = True
Else
@@ -5186,7 +5187,7 @@ Public Class frmConstructor_Main
End If
End Sub
Private Sub grvwGrid_MouseMove(sender As Object, e As MouseEventArgs) Handles grvwGrid.MouseMove, grvwTiles.MouseMove, grvwCarousel.MouseMove
Dim view As GridView = CType(sender, GridView)
Dim view As BaseView = CType(sender, BaseView)
If e.Button = MouseButtons.Left And Not GRIDdownHitInfo Is Nothing Then
Dim dragSize As Size = SystemInformation.DragSize