TestEIn 1.6i6 :
- aggiunto a Scene evento OnMouseMoveScene.
This commit is contained in:
@@ -46,5 +46,5 @@ Imports System.Runtime.InteropServices
|
||||
' utilizzando l'asterisco (*) come descritto di seguito:
|
||||
' <Assembly: AssemblyVersion("1.0.*")>
|
||||
|
||||
<Assembly: AssemblyVersion("1.6.9.5")>
|
||||
<Assembly: AssemblyFileVersion("1.6.9.5")>
|
||||
<Assembly: AssemblyVersion("1.6.9.6")>
|
||||
<Assembly: AssemblyFileVersion("1.6.9.6")>
|
||||
|
||||
@@ -215,6 +215,7 @@ Public Class Scene
|
||||
Public Event OnMousePointFromSelection(ByVal sender As Object, ByVal nId As Integer, ByVal PtP As Point3d, ByVal nAux As Integer)
|
||||
Public Event OnMouseDownScene(ByVal sender As Object, e As System.Windows.Forms.MouseEventArgs)
|
||||
Public Event OnMouseUpScene(ByVal sender As Object, e As System.Windows.Forms.MouseEventArgs)
|
||||
Public Event OnMouseMoveScene(ByVal sender As Object, e As System.Windows.Forms.MouseEventArgs)
|
||||
Public Event OnCursorPos(ByVal sender As Object, ByVal sCursorPos As String)
|
||||
Public Event OnShowDistance(ByVal sender As Object, ByVal sDistance As String)
|
||||
Public Event OnCloseGetDist(ByVal sender As Object)
|
||||
@@ -432,8 +433,9 @@ Public Class Scene
|
||||
Else
|
||||
MyBase.OnMouseDown(e)
|
||||
End If
|
||||
Focus()
|
||||
' Evento che può essere gestito da altri
|
||||
RaiseEvent OnMouseDownScene(Me, e)
|
||||
Focus()
|
||||
End Sub
|
||||
|
||||
Protected Overrides Sub OnMouseUp(e As System.Windows.Forms.MouseEventArgs)
|
||||
@@ -496,6 +498,7 @@ Public Class Scene
|
||||
Else
|
||||
MyBase.OnMouseUp(e)
|
||||
End If
|
||||
' Evento che può essere gestito da altri
|
||||
RaiseEvent OnMouseUpScene(Me, e)
|
||||
' Ripristino il contesto originale
|
||||
If nOldGseCtx <> m_nGseContext Then
|
||||
@@ -579,6 +582,8 @@ Public Class Scene
|
||||
ElseIf m_nStatus = ST.SEL Then
|
||||
Cursor = New Cursor(Me.GetType(), "Select.cur")
|
||||
End If
|
||||
' Evento che può essere gestito da altri
|
||||
RaiseEvent OnMouseMoveScene(Me, e)
|
||||
' Ripristino il contesto originale
|
||||
If nOldGseCtx <> m_nGseContext Then
|
||||
EgtSetCurrentContext(nOldGseCtx)
|
||||
|
||||
Reference in New Issue
Block a user