ms

2017-02-15 09:07:26 +01:00
parent a815c8ab5d
commit 81c3ebe35e
25 changed files with 7215 additions and 7503 deletions
--- a/app/DD-Record-Organizer/frmScanFiles.Designer.vb
+++ b/app/DD-Record-Organizer/frmScanFiles.Designer.vb
@@ -25,7 +25,7 @@ Partial Class frmScanFiles
        Me.components = New System.ComponentModel.Container()
        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmScanFiles))
        Me.ListView1 = New System.Windows.Forms.ListView()
-        Me.ColumnHeader2 = CType(New System.Windows.Forms.ColumnHeader(), System.Windows.Forms.ColumnHeader)
+        Me.ColumnHeader2 = CType(New System.Windows.Forms.ColumnHeader(),System.Windows.Forms.ColumnHeader)
        Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components)
        Me.Panel1 = New System.Windows.Forms.Panel()
        Me.PdfViewer1 = New DevExpress.XtraPdfViewer.PdfViewer()
@@ -69,29 +69,29 @@ Partial Class frmScanFiles
        Me.PdfBarController2 = New DevExpress.XtraPdfViewer.Bars.PdfBarController()
        Me.btndelete = New System.Windows.Forms.Button()
        Me.chkInFront = New System.Windows.Forms.CheckBox()
-        Me.Timer1 = New System.Windows.Forms.Timer(Me.components)
+        Me.TimerCheckScanFiles = New System.Windows.Forms.Timer(Me.components)
        Me.Timer2 = New System.Windows.Forms.Timer(Me.components)
        Me.Button1 = New System.Windows.Forms.Button()
        Me.ToolTip1 = New System.Windows.Forms.ToolTip(Me.components)
-        Me.Panel1.SuspendLayout()
-        Me.StatusStrip2.SuspendLayout()
-        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
-        CType(Me.PdfBarController1, System.ComponentModel.ISupportInitialize).BeginInit()
-        CType(Me.PdfBarController2, System.ComponentModel.ISupportInitialize).BeginInit()
-        Me.SuspendLayout()
+        Me.Panel1.SuspendLayout
+        Me.StatusStrip2.SuspendLayout
+        CType(Me.RibbonControl1,System.ComponentModel.ISupportInitialize).BeginInit
+        CType(Me.PdfBarController1,System.ComponentModel.ISupportInitialize).BeginInit
+        CType(Me.PdfBarController2,System.ComponentModel.ISupportInitialize).BeginInit
+        Me.SuspendLayout
        '
        'ListView1
        '
        Me.ListView1.Columns.AddRange(New System.Windows.Forms.ColumnHeader() {Me.ColumnHeader2})
        resources.ApplyResources(Me.ListView1, "ListView1")
-        Me.ListView1.FullRowSelect = True
-        Me.ListView1.GridLines = True
+        Me.ListView1.FullRowSelect = true
+        Me.ListView1.GridLines = true
        Me.ListView1.HeaderStyle = System.Windows.Forms.ColumnHeaderStyle.Nonclickable
        Me.ListView1.LargeImageList = Me.ImageList1
-        Me.ListView1.MultiSelect = False
+        Me.ListView1.MultiSelect = false
        Me.ListView1.Name = "ListView1"
        Me.ListView1.SmallImageList = Me.ImageList1
-        Me.ListView1.UseCompatibleStateImageBehavior = False
+        Me.ListView1.UseCompatibleStateImageBehavior = false
        Me.ListView1.View = System.Windows.Forms.View.Details
        '
        'ColumnHeader2
@@ -100,7 +100,7 @@ Partial Class frmScanFiles
        '
        'ImageList1
        '
-        Me.ImageList1.ImageStream = CType(resources.GetObject("ImageList1.ImageStream"), System.Windows.Forms.ImageListStreamer)
+        Me.ImageList1.ImageStream = CType(resources.GetObject("ImageList1.ImageStream"),System.Windows.Forms.ImageListStreamer)
        Me.ImageList1.TransparentColor = System.Drawing.Color.Transparent
        Me.ImageList1.Images.SetKeyName(0, "doc_pdf.png")
        '
@@ -193,7 +193,7 @@ Partial Class frmScanFiles
        'PdfExactZoomListBarSubItem1
        '
        Me.PdfExactZoomListBarSubItem1.Id = 9
-        Me.PdfExactZoomListBarSubItem1.LinksPersistInfo.AddRange(New DevExpress.XtraBars.LinkPersistInfo() {New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom10CheckItem1, True), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom25CheckItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom50CheckItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom75CheckItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom100CheckItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom125CheckItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom150CheckItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom200CheckItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom400CheckItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom500CheckItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfSetActualSizeZoomModeCheckItem1, True), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfSetPageLevelZoomModeCheckItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfSetFitWidthZoomModeCheckItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfSetFitVisibleZoomModeCheckItem1)})
+        Me.PdfExactZoomListBarSubItem1.LinksPersistInfo.AddRange(New DevExpress.XtraBars.LinkPersistInfo() {New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom10CheckItem1, true), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom25CheckItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom50CheckItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom75CheckItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom100CheckItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom125CheckItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom150CheckItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom200CheckItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom400CheckItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom500CheckItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfSetActualSizeZoomModeCheckItem1, true), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfSetPageLevelZoomModeCheckItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfSetFitWidthZoomModeCheckItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfSetFitVisibleZoomModeCheckItem1)})
        Me.PdfExactZoomListBarSubItem1.Name = "PdfExactZoomListBarSubItem1"
        Me.PdfExactZoomListBarSubItem1.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionInMenu
        '
@@ -307,7 +307,7 @@ Partial Class frmScanFiles
        '
        Me.PdfFormDataRibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.PdfFormDataBarPageGroup1})
        Me.PdfFormDataRibbonPage1.Name = "PdfFormDataRibbonPage1"
-        Me.PdfFormDataRibbonPage1.Visible = False
+        Me.PdfFormDataRibbonPage1.Visible = false
        '
        'PdfFormDataBarPageGroup1
        '
@@ -320,7 +320,7 @@ Partial Class frmScanFiles
        Me.btnrefresh.Image = Global.DD_Record_Organizer.My.Resources.Resources.refresh_16xLG
        resources.ApplyResources(Me.btnrefresh, "btnrefresh")
        Me.btnrefresh.Name = "btnrefresh"
-        Me.btnrefresh.UseVisualStyleBackColor = True
+        Me.btnrefresh.UseVisualStyleBackColor = true
        '
        'PdfBarController2
        '
@@ -357,19 +357,19 @@ Partial Class frmScanFiles
        resources.ApplyResources(Me.btndelete, "btndelete")
        Me.btndelete.Name = "btndelete"
        Me.ToolTip1.SetToolTip(Me.btndelete, resources.GetString("btndelete.ToolTip"))
-        Me.btndelete.UseVisualStyleBackColor = True
+        Me.btndelete.UseVisualStyleBackColor = true
        '
        'chkInFront
        '
        resources.ApplyResources(Me.chkInFront, "chkInFront")
        Me.chkInFront.Checked = Global.DD_Record_Organizer.My.MySettings.Default.User_InBoxScan_NotinFront
-        Me.chkInFront.DataBindings.Add(New System.Windows.Forms.Binding("Checked", Global.DD_Record_Organizer.My.MySettings.Default, "User_InBoxScan_NotinFront", True, System.Windows.Forms.DataSourceUpdateMode.OnPropertyChanged))
+        Me.chkInFront.DataBindings.Add(New System.Windows.Forms.Binding("Checked", Global.DD_Record_Organizer.My.MySettings.Default, "User_InBoxScan_NotinFront", true, System.Windows.Forms.DataSourceUpdateMode.OnPropertyChanged))
        Me.chkInFront.Name = "chkInFront"
-        Me.chkInFront.UseVisualStyleBackColor = True
+        Me.chkInFront.UseVisualStyleBackColor = true
        '
-        'Timer1
+        'TimerCheckScanFiles
        '
-        Me.Timer1.Interval = 1000
+        Me.TimerCheckScanFiles.Interval = 5000
        '
        'Button1
        '
@@ -377,7 +377,7 @@ Partial Class frmScanFiles
        resources.ApplyResources(Me.Button1, "Button1")
        Me.Button1.Name = "Button1"
        Me.ToolTip1.SetToolTip(Me.Button1, resources.GetString("Button1.ToolTip"))
-        Me.Button1.UseVisualStyleBackColor = True
+        Me.Button1.UseVisualStyleBackColor = true
        '
        'frmScanFiles
        '
@@ -389,19 +389,19 @@ Partial Class frmScanFiles
        Me.Controls.Add(Me.Panel1)
        Me.Controls.Add(Me.btnrefresh)
        Me.Controls.Add(Me.ListView1)
-        Me.MaximizeBox = False
+        Me.MaximizeBox = false
        Me.Name = "frmScanFiles"
-        Me.Panel1.ResumeLayout(False)
-        Me.Panel1.PerformLayout()
-        Me.StatusStrip2.ResumeLayout(False)
-        Me.StatusStrip2.PerformLayout()
-        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
-        CType(Me.PdfBarController1, System.ComponentModel.ISupportInitialize).EndInit()
-        CType(Me.PdfBarController2, System.ComponentModel.ISupportInitialize).EndInit()
-        Me.ResumeLayout(False)
-        Me.PerformLayout()
+        Me.Panel1.ResumeLayout(false)
+        Me.Panel1.PerformLayout
+        Me.StatusStrip2.ResumeLayout(false)
+        Me.StatusStrip2.PerformLayout
+        CType(Me.RibbonControl1,System.ComponentModel.ISupportInitialize).EndInit
+        CType(Me.PdfBarController1,System.ComponentModel.ISupportInitialize).EndInit
+        CType(Me.PdfBarController2,System.ComponentModel.ISupportInitialize).EndInit
+        Me.ResumeLayout(false)
+        Me.PerformLayout

-    End Sub
+End Sub
    Friend WithEvents ColumnHeader2 As System.Windows.Forms.ColumnHeader
    Friend WithEvents ImageList1 As System.Windows.Forms.ImageList
    Friend WithEvents btnrefresh As System.Windows.Forms.Button
@@ -447,7 +447,7 @@ Partial Class frmScanFiles
    Friend WithEvents btndelete As System.Windows.Forms.Button
    Friend WithEvents chkInFront As System.Windows.Forms.CheckBox
    Private WithEvents ListView1 As System.Windows.Forms.ListView
-    Friend WithEvents Timer1 As System.Windows.Forms.Timer
+    Friend WithEvents TimerCheckScanFiles As System.Windows.Forms.Timer
    Friend WithEvents Timer2 As System.Windows.Forms.Timer
    Friend WithEvents Button1 As System.Windows.Forms.Button
    Friend WithEvents ToolTip1 As System.Windows.Forms.ToolTip