Update ASCOM driver

marcocipriani01 · Nov 25, 2021 · e956a6c · e956a6c
1 parent 5d6149e
commit e956a6c
Show file tree

Hide file tree

Showing 8 changed files with 33 additions and 39 deletions.
diff --git a/ThunderFocusASCOM/.gitignore b/ThunderFocusASCOM/.gitignore
@@ -0,0 +1,3 @@
+bin/
+obj/
+.vs/
diff --git a/ThunderFocusASCOM/.vs/ThunderFocusASCOM/v16/.suo b/ThunderFocusASCOM/.vs/ThunderFocusASCOM/v16/.suo
diff --git a/ThunderFocusASCOM/Driver.vb b/ThunderFocusASCOM/Driver.vb
@@ -135,7 +135,7 @@ Public Class Focuser
     Public Sub SetupDialog() Implements IFocuserV3.SetupDialog
         Application.EnableVisualStyles()
         If IsConnected Then
-            MessageBox.Show("Ponte in esecuzione, utilizzare il pannello di controllo per la configurazione.", "ThunderFocus", MessageBoxButtons.OK, MessageBoxIcon.Information)
+            MessageBox.Show("ASCOM bridge running, use the control panel to configure the focuser.", "ThunderFocus", MessageBoxButtons.OK, MessageBoxIcon.Information)
         Else
             Using F As SetupDialogForm = New SetupDialogForm()
                 Dim result As DialogResult = F.ShowDialog()

diff --git a/ThunderFocusASCOM/SetupDialogForm.Designer.vb b/ThunderFocusASCOM/SetupDialogForm.Designer.vb
diff --git a/ThunderFocusASCOM/SetupDialogForm.vb b/ThunderFocusASCOM/SetupDialogForm.vb
@@ -16,12 +16,8 @@ Public Class SetupDialogForm
     Private Sub ShowAscomWebPage(sender As Object, e As EventArgs) Handles PictureBox1.DoubleClick, PictureBox1.Click
         Try
             Process.Start("https://ascom-standards.org/")
-        Catch noBrowser As ComponentModel.Win32Exception
-            If noBrowser.ErrorCode = -2147467259 Then
-                MessageBox.Show(Me, noBrowser.Message, "ThunderFocus", MessageBoxButtons.OK, MessageBoxIcon.Error)
-            End If
         Catch other As Exception
-            MessageBox.Show(Me, other.Message, "ThunderFocus", MessageBoxButtons.OK, MessageBoxIcon.Error)
+            MessageBox.Show(Me, "Could not open the browser.", "ThunderFocus", MessageBoxButtons.OK, MessageBoxIcon.Error)
         End Try
     End Sub
 
@@ -35,7 +31,7 @@ Public Class SetupDialogForm
             Dim dir As String = Environment.GetEnvironmentVariable("thunderfok")
             Process.Start(dir + "\bin\javaw.exe", """-jar"" """ + dir + "\ThunderFocus.jar""")
         Catch ex As Exception
-            MessageBox.Show(Me, "Errore di avvio!", "ThunderFocus", MessageBoxButtons.OK, MessageBoxIcon.Error)
+            MessageBox.Show(Me, "Could not start ThunderFocus!", "ThunderFocus", MessageBoxButtons.OK, MessageBoxIcon.Error)
         End Try
     End Sub
 End Class
diff --git a/ThunderFocusASCOM/ThunderFocusASCOM.vbproj b/ThunderFocusASCOM/ThunderFocusASCOM.vbproj
@@ -154,9 +154,6 @@
   </ItemGroup>
   <ItemGroup>
     <Content Include="ASCOM.png" />
-    <Content Include="ReadMe.htm">
-      <SubType>Designer</SubType>
-    </Content>
     <None Include="Resources\icon.ico" />
     <None Include="Resources\ThunderFocus.png" />
   </ItemGroup>

diff --git a/ThunderFocusASCOM/bin/.gitignore b/ThunderFocusASCOM/bin/.gitignore
diff --git a/ThunderFocusASCOM/obj/.gitignore b/ThunderFocusASCOM/obj/.gitignore
-Original file line number
+Diff line change
@@ -0,0 +1,3 @@
+    bin/
+    obj/
+    .vs/