MS_12.03.2016

This commit is contained in:
SchreiberM
2016-03-14 09:21:32 +01:00
parent c3965e6243
commit 32a1c4cf5e
31 changed files with 2208 additions and 2864 deletions

View File

@@ -372,6 +372,13 @@
frm.Show()
End Sub
Public Sub OpenFormCockpit()
Close_Maximized_Forms()
Dim frm As New frmCockpit
frm = frmCockpit.Instance()
frm.MdiParent = MAIN_FORM
frm.Show()
End Sub
Public Function ShortGUID() As String
Return Guid.NewGuid().ToString().GetHashCode().ToString("x")