diff --git a/Form1.vb b/Form1.vb index 5b3c9a9..f2b21da 100644 --- a/Form1.vb +++ b/Form1.vb @@ -54,7 +54,7 @@ Public Class Form1 m_Controller1.SetScene(Scene1) m_Controller2.SetScene(Scene2) 'Attiva scena 1 - OnMouseDownScene(Scene1) + OnMouseDownScene(Scene1, Nothing) 'Posizione e dimensioni del Form If ModifierKeys <> Keys.Shift Then Dim nFlag As Integer @@ -133,7 +133,7 @@ Public Class Form1 sender.ResetStatusAnalyze() End Sub - Private Sub OnMouseDownScene(ByVal sender As Object) Handles Scene1.OnMouseDownScene, Scene2.OnMouseDownScene + Private Sub OnMouseDownScene(ByVal sender As Object, ByVal e As MouseEventArgs) Handles Scene1.OnMouseDownScene, Scene2.OnMouseDownScene If sender.GetCtx() = 1 Then RadioButton1.Checked = True Else diff --git a/My Project/AssemblyInfo.vb b/My Project/AssemblyInfo.vb index 49be392..4d12a77 100644 --- a/My Project/AssemblyInfo.vb +++ b/My Project/AssemblyInfo.vb @@ -46,5 +46,5 @@ Imports System.Runtime.InteropServices ' utilizzando l'asterisco (*) come descritto di seguito: ' - - + +