TIR und TIR alt Formular

2023-03-17 12:01:37 +01:00
parent 712c30ed5c
commit 4abe9426e4
5 changed files with 95 additions and 79 deletions
--- a/Aviso/frmHauptfenster.vb
+++ b/Aviso/frmHauptfenster.vb
@@ -4442,6 +4442,13 @@ Public Class frmHauptfenster
        eh.Show()
        Me.Cursor = Cursors.Default
    End Sub
+
+    Private Sub CarnetTIRAltToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles CarnetTIRAltToolStripMenuItem.Click
+        Me.Cursor = Cursors.WaitCursor
+        Dim eh As New SDL.frmTIR_alt
+        eh.Show()
+        Me.Cursor = Cursors.Default
+    End Sub
 End Class

 Public Class AvisoStatusFunctions