Endre og opprett kunde og utleie. Brukermanual, shortcuts hovedmeny

kimhist · May 3, 2012 · 6cbc4ad · 6cbc4ad
1 parent c00c047
commit 6cbc4ad
Show file tree

Hide file tree

Showing 13 changed files with 360 additions and 148 deletions.
diff --git a/Program/My Project/Resources.Designer.vb b/Program/My Project/Resources.Designer.vb
diff --git a/Program/My Project/Resources.resx b/Program/My Project/Resources.resx
@@ -121,7 +121,13 @@
   <data name="confirm" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\ico\confirm.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
+  <data name="logout" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\ico\logout.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
   <data name="cancel" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\ico\cancel.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
+  <data name="support" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\ico\support.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
 </root>
diff --git a/Program/Program.vbproj b/Program/Program.vbproj
@@ -271,6 +271,12 @@
   <ItemGroup>
     <None Include="lib\MySql.Data.dll" />
   </ItemGroup>
+  <ItemGroup>
+    <None Include="ico\logout.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="ico\support.png" />
+  </ItemGroup>
   <Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
   <!-- To modify your build process, add your task inside one of the targets below and uncomment it. 
        Other similar extension points exist, see Microsoft.Common.targets.

diff --git a/Program/gui/frmBrukerbehandling.Designer.vb b/Program/gui/frmBrukerbehandling.Designer.vb
diff --git a/Program/gui/frmHoved.Designer.vb b/Program/gui/frmHoved.Designer.vb
diff --git a/Program/gui/frmHoved.resx b/Program/gui/frmHoved.resx
@@ -120,39 +120,4 @@
   <metadata name="msMenu.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
     <value>17, 17</value>
   </metadata>
-  <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
-  <data name="tsmiLogout.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-    <value>
-        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
-        YQUAAAAZdEVYdFNvZnR3YXJlAEFkb2JlIEltYWdlUmVhZHlxyWU8AAAGaUlEQVRYR8VXa2yTVRj+kiVL
-        liyBdevWjX27tVvbjbXdWra1W9tdGHNcsxBFCKhEhLlINq4aNMBgHaCRgPrDISqB6A9/ICwQ0EgUrxCR
-        hEV0CRfZYGNugiiRRMTv+D6Hnm+nXWELf/zxpN/3nffynPc85z2nCmNMGfl9eMLIycmZlF+Qz2w2WwTy
-        8/NvZedkK6qqxhHw+0DI+ZTxCGRlZcXn5uWuzsvLuwDH0LYOdVrZNFblr4pAIBDQLPkWpaa22mA2m2+Q
-        /cvkmwgimWpmBCZMIDc3d67Nbut3lbiYz+f9F46dOzpVf8DPGh5r0DGjYQarn1GvWW1WTrCktIQBdrt9
-        iGIsULMiSUyIAM2ivdhRzCq8FSxYHWS1dbUaJ7C9U8XskVSAkrPp9dO1AmsBH/dV+lh1TTXzer3M4XAw
-        s8W8i0jEZWZSJQjjEqBSfoBZI1Hd9DoEx2+YQEitrKrEjHWI8YICEBgdh6/f7+fVoLFuQeKhBCwWSzsc
-        UGYpOaurCxPYFuIzRFIB2GGcxKl0Ro1jLBAMsFJ3KaMK7YYmHkiAxNbkdDr5zKnknACAZ7EEISTw+fQx
-        eZx2Amkg9jgmhKrmmfOeiUkgKzsr3u12j3h9XlZTWyOS8l+8L1y08N79XRBSYRMmpY+TDd8F3Ue7jU3z
-        myLGRQxUrrS09M/s7OxEQULfhvZC+zrPNA8XHBIKQEytq1rZ1ev9Z8U2hDCjbchOI7GhvPG/9F++1NzS
-        zIUo2yE2trDDWfxqBAGafZzb474t1AtHAA6Ln1rM+gf6jpFDApw6OjvU8opyPi7bka1GO4fvd7KbdPHK
-        ha8XPLkgwg72EHCJu+RvqgKPxytgs1vnEAEuPCQVgHi+/OZkr0guCJSVl0XYBYNBCE2j9VXSM9LFVpv0
-        6YlP+rALomOi0q4SJ9cCJzB7zuzDCAoCAhDiuhfXYuu5ZNFsDW1VEUC2DT9rJGLFlG5S0tN1ElUrmleM
-        sUUFG2c2fqUTqG+oH8S6yu0VQtt3YN/n0efE1tAW1ePxjGnF5Kvl5OYoJpPpPogIzoY97+7pQSw5NnKR
-        MG/pBGjt78II6yMAsZw+c+qJWASwXLJt+Fmjg2qUAJGYkjlFOXr8yEpUV7ZHLorBGxtfAgQEKwwI4B1i
-        iiawpaOd93rZNvyskbCUtLQ0HajCqTPfmdGEou1dLhejCiVEEEBSGbGOaRBAQ4m2pQQa7SYlNS1VB8hQ
-        30iMZY9v619ab+QEAkE/gzBkOJwORgHHVABVWfrs0ghblHjZ8mV3ceqlphIBASJDa292upxj4qPqFCuR
-        E5j/+Py7UDbWXQAESN0zY1Wh56eeL0ACtvBreaGF9Zw/dzwjI0Mxphp1oBoNjQ3PIZYcG8+zZs8a1cDK
-        1pVDWCcEE4BTpb8SDSjWbclE309c7rvEBocHMZPDBBMSGo1EIAzsBqrAKVRAjo3ZL29eProLut55+yjW
-        BAMCeKfLiEazskSTQCLMlr4b0HrRfFB2JE4xpnDgOWNKhstqtfJDKDr2zl07v9V3wfneH5u8lV5+bgvA
-        qbCokNEt5zQFj5dJpKRQknFAPgl0b+wtmlrECcixQebsuR9W6ATQane8tv0OSgVjASwDLqB0hn9EM9JJ
-        JKckKw8D2SaQgI/R+U8HjyMiJnJs3rLpH7HF9dOw9+LP7cGaIIOBDMyATjlGTeUkBebLkZxMBGKBiJFN
-        IR1I39PFhsE3Op7XV8FIxG+Iisq34kRqvTdxDwRrAbxjKRCQAt9LM6XtpTWuJQJxhmSDAtBzPH2rp7H9
-        VC1G9wJWVFTEYsXa/dbuv8La4eKOvpYv2tS+kU0tnsqdZWA2pAdGBw6WhJEIGR06HHjGN7qKcxvYRvsj
-        5tr1a7BjWmU9jflfcH1kcCdtER4ETjLwLSxM3O+4PgA8IzHGYvkhxpKnF+NS8x6640MJ0GDc0G/XP97w
-        ygY9III+KkBq1Zo2NvDrtc+wZbFk4xGAQRzhzQMf7uctFEEeBZ4yD+va24Wyvy+SJyUlTYiAMFrSN3Dl
-        Jh0o9//pFNonBCh/4+aNjK5lf1Di59GeDQaDMjlpMsdEKiAb4QbbMTg8cPvQkUO4JbF5TfP4aSgIoUr4
-        1ra6jR3sPsiuDV29Qz6vQ+3oF5i1SP4oBAQZNKJZhC7CGcIwAeUFboS/odRz0dh4YkM48WSauYQxFcCJ
-        +H/hP2h2W50rXP2KAAAAAElFTkSuQmCC
-</value>
-  </data>
 </root>
diff --git a/Program/gui/frmHoved.vb b/Program/gui/frmHoved.vb
@@ -1,14 +1,15 @@
 Imports System.Reflection
 
 Public Class frmHoved
+    Public Shared login As Login
+
     Private caller As Form
-    Private login As Login
 
     Sub New(ByRef caller As Object, ByVal login As Login)
         Me.caller = caller
 
         If (login IsNot Nothing) Then
-            Me.login = login
+            frmHoved.login = login
             InitializeComponent()
             init()
         Else
@@ -72,47 +73,47 @@ Public Class frmHoved
     End Function
 
     Private Sub addBrukerbehandling()
-        createButton(1, "Brukerbehandling", "frmBrukerbehandling")
+        createButton(1, "&Brukerbehandling", "frmBrukerbehandling")
     End Sub
 
     Private Sub addEndreBruker()
-        createButton(2, "Endre bruker", "frmEndreBruker")
+        createButton(2, "Endre b&ruker", "frmEndreBruker")
     End Sub
 
     Private Sub addKunderegistrering()
-        createButton(3, "Kunderegistrering", "frmKunderegistrering")
+        createButton(3, "&Kunderegistrering", "frmKunderegistrering")
     End Sub
 
     Private Sub addEndreKunde()
-        createButton(4, "Endre kunde", "frmEndreKunde")
+        createButton(4, "Endre k&unde", "frmEndreKunde")
     End Sub
 
     Private Sub addProduktRegistrering()
-        createButton(5, "Produktregistrering", "frmProduktRegistrering")
+        createButton(5, "&Produktregistrering", "frmProduktRegistrering")
     End Sub
 
     Private Sub addEndreProdukt()
-        createButton(6, "Endre produkt", "frmEndreProdukt")
+        createButton(6, "Endre pr&odukt", "frmEndreProdukt")
     End Sub
 
     Private Sub addUtleieRegistrering()
-        createButton(7, "Utleieregistrering", "frmUtleieregistrering")
+        createButton(7, "&Utleieregistrering", "frmUtleieregistrering")
     End Sub
 
     Private Sub addEndreUtleie()
-        createButton(8, "Endre utleie", "frmEndreUtleie")
+        createButton(8, "Endre u&tleie", "frmEndreUtleie")
     End Sub
 
     Private Sub addPakkeregistrering()
-        createButton(9, "Pakkeregistrering", "frmPakkeregistrering")
+        createButton(9, "P&akkeregistrering", "frmPakkeregistrering")
     End Sub
 
     Private Sub addEndrePakke()
-        createButton(10, "Endre pakke", "frmEndrePakke")
+        createButton(10, "Endre pa&kke", "frmEndrePakke")
     End Sub
 
     Private Sub addStatistikk()
-        createButton(11, "Statistikk", "frmStatistikk")
+        createButton(11, "&Statistikk", "frmStatistikk")
     End Sub
 
     Private Sub frmHoved_FormClosed(ByVal sender As System.Object, ByVal e As System.Windows.Forms.FormClosedEventArgs) Handles MyBase.FormClosed
@@ -123,4 +124,8 @@ Public Class frmHoved
         caller.Show()
         Me.Dispose()
     End Sub
+
+    Private Sub tsmiBrukermanual_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tsmiBrukermanual.Click
+        System.Diagnostics.Process.Start("http://sportutleie.wikidot.com/")
+    End Sub
 End Class