From 6e715d4d3cc0fe7012ee1a43e2329f3a9492eeca Mon Sep 17 00:00:00 2001
From: SchreiberM <m.schreiber@didalog.de>
Date: Thu, 23 Jun 2016 17:06:40 +0200
Subject: [PATCH] ms1

---
 .../My Project/AssemblyInfo.vb                |  2 +-
 app/DD-Record-Organiser/frmMain.Designer.vb   |  8 ++++
 app/DD-Record-Organiser/frmMain.resx          | 37 +++++++++++++++----
 app/DD-Record-Organiser/frmMain.vb            |  7 +++-
 4 files changed, 44 insertions(+), 10 deletions(-)

diff --git a/app/DD-Record-Organiser/My Project/AssemblyInfo.vb b/app/DD-Record-Organiser/My Project/AssemblyInfo.vb
index cb1c3cc..492219f 100644
--- a/app/DD-Record-Organiser/My Project/AssemblyInfo.vb	
+++ b/app/DD-Record-Organiser/My Project/AssemblyInfo.vb	
@@ -33,7 +33,7 @@ Imports System.Runtime.InteropServices
 ' übernehmen, indem Sie "*" eingeben:
 ' <Assembly: AssemblyVersion("1.0.*")> 
 
-<Assembly: AssemblyVersion("2.4.6.1")> 
+<Assembly: AssemblyVersion("2.4.6.2")> 
 <Assembly: AssemblyFileVersion("1.0.0.0")> 
 
 <Assembly: NeutralResourcesLanguageAttribute("")> 
\ No newline at end of file
diff --git a/app/DD-Record-Organiser/frmMain.Designer.vb b/app/DD-Record-Organiser/frmMain.Designer.vb
index cbc95a7..016a6fe 100644
--- a/app/DD-Record-Organiser/frmMain.Designer.vb
+++ b/app/DD-Record-Organiser/frmMain.Designer.vb
@@ -79,6 +79,7 @@ Partial Class frmMain
         Me.BarButtonItem11 = New DevExpress.XtraBars.BarButtonItem()
         Me.TimerClose3Minutes = New System.Windows.Forms.Timer(Me.components)
         Me.RibbonPageGroup3 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.TextBox1 = New System.Windows.Forms.TextBox()
         Me.Button1 = New System.Windows.Forms.Button()
         Me.cmsSystray.SuspendLayout()
         CType(Me.DD_DMSDataSet, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -528,6 +529,11 @@ Partial Class frmMain
         Me.RibbonPageGroup3.Name = "RibbonPageGroup3"
         resources.ApplyResources(Me.RibbonPageGroup3, "RibbonPageGroup3")
         '
+        'TextBox1
+        '
+        resources.ApplyResources(Me.TextBox1, "TextBox1")
+        Me.TextBox1.Name = "TextBox1"
+        '
         'Button1
         '
         resources.ApplyResources(Me.Button1, "Button1")
@@ -542,6 +548,7 @@ Partial Class frmMain
         resources.ApplyResources(Me, "$this")
         Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
         Me.Controls.Add(Me.Button1)
+        Me.Controls.Add(Me.TextBox1)
         Me.Controls.Add(Me.RibbonStatusBar1)
         Me.Controls.Add(Me.ribbonMain)
         Me.IsMdiContainer = True
@@ -614,6 +621,7 @@ Partial Class frmMain
     Friend WithEvents LabelLanguage As DevExpress.XtraBars.BarStaticItem
     Friend WithEvents BarButtonItem20 As DevExpress.XtraBars.BarButtonItem
     Friend WithEvents BarButtonItem21 As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents TextBox1 As System.Windows.Forms.TextBox
     Friend WithEvents Button1 As System.Windows.Forms.Button
 
 End Class
diff --git a/app/DD-Record-Organiser/frmMain.resx b/app/DD-Record-Organiser/frmMain.resx
index 9cfa067..51c53d4 100644
--- a/app/DD-Record-Organiser/frmMain.resx
+++ b/app/DD-Record-Organiser/frmMain.resx
@@ -1941,13 +1941,13 @@ Konfiguration</value>
     <value>Administration</value>
   </data>
   <data name="ribbonMain.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1586, 150</value>
+    <value>1594, 150</value>
   </data>
   <data name="RibbonStatusBar1.Location" type="System.Drawing.Point, System.Drawing">
-    <value>0, 699</value>
+    <value>0, 703</value>
   </data>
   <data name="RibbonStatusBar1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1586, 23</value>
+    <value>1594, 23</value>
   </data>
   <data name="&gt;&gt;RibbonStatusBar1.Name" xml:space="preserve">
     <value>RibbonStatusBar1</value>
@@ -1959,7 +1959,7 @@ Konfiguration</value>
     <value>$this</value>
   </data>
   <data name="&gt;&gt;RibbonStatusBar1.ZOrder" xml:space="preserve">
-    <value>2</value>
+    <value>3</value>
   </data>
   <data name="&gt;&gt;ribbonMain.Name" xml:space="preserve">
     <value>ribbonMain</value>
@@ -1971,7 +1971,7 @@ Konfiguration</value>
     <value>$this</value>
   </data>
   <data name="&gt;&gt;ribbonMain.ZOrder" xml:space="preserve">
-    <value>4</value>
+    <value>5</value>
   </data>
   <metadata name="DefaultLookAndFeel1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
     <value>242, 17</value>
@@ -1985,14 +1985,35 @@ Konfiguration</value>
   <data name="RibbonPageGroup3.Text" xml:space="preserve">
     <value>Schnellstart </value>
   </data>
+  <data name="TextBox1.Location" type="System.Drawing.Point, System.Drawing">
+    <value>303, 228</value>
+  </data>
+  <data name="TextBox1.Size" type="System.Drawing.Size, System.Drawing">
+    <value>143, 22</value>
+  </data>
+  <data name="TextBox1.TabIndex" type="System.Int32, mscorlib">
+    <value>4</value>
+  </data>
+  <data name="&gt;&gt;TextBox1.Name" xml:space="preserve">
+    <value>TextBox1</value>
+  </data>
+  <data name="&gt;&gt;TextBox1.Type" xml:space="preserve">
+    <value>System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </data>
+  <data name="&gt;&gt;TextBox1.Parent" xml:space="preserve">
+    <value>$this</value>
+  </data>
+  <data name="&gt;&gt;TextBox1.ZOrder" xml:space="preserve">
+    <value>1</value>
+  </data>
   <data name="Button1.Location" type="System.Drawing.Point, System.Drawing">
-    <value>12, 156</value>
+    <value>303, 269</value>
   </data>
   <data name="Button1.Size" type="System.Drawing.Size, System.Drawing">
     <value>75, 23</value>
   </data>
   <data name="Button1.TabIndex" type="System.Int32, mscorlib">
-    <value>4</value>
+    <value>5</value>
   </data>
   <data name="Button1.Text" xml:space="preserve">
     <value>Button1</value>
@@ -2022,7 +2043,7 @@ Konfiguration</value>
     <value>6, 13</value>
   </data>
   <data name="$this.ClientSize" type="System.Drawing.Size, System.Drawing">
-    <value>1586, 722</value>
+    <value>1594, 726</value>
   </data>
   <data name="$this.Font" type="System.Drawing.Font, System.Drawing">
     <value>Segoe UI, 8.25pt</value>
diff --git a/app/DD-Record-Organiser/frmMain.vb b/app/DD-Record-Organiser/frmMain.vb
index b7a01bc..3042936 100644
--- a/app/DD-Record-Organiser/frmMain.vb
+++ b/app/DD-Record-Organiser/frmMain.vb
@@ -752,7 +752,12 @@ Public Class frmMain
         frm.Show()
     End Sub
 
-    Private Sub Button1_Click_1(sender As Object, e As EventArgs) Handles Button1.Click
+    Private Sub Button1_Click_1(sender As Object, e As EventArgs)
         ClassJumpRecord.JumpToRecord(0, 95)
     End Sub
+
+    Private Sub Button1_Click_2(sender As Object, e As EventArgs) Handles Button1.Click
+        Dim dt As Date = Date.Today
+        MsgBox(dt.ToString("dd-MM-yyyy", CultureInfo.InvariantCulture))
+    End Sub
 End Class