AppStd/RecordOrganizer
8
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

MS_27.04.2016_1

Browse Source
This commit is contained in:
SchreiberM
2016-04-28 11:47:47 +02:00
parent c173fe57e8
commit 0cae7cdc6a
3 changed files with 51 additions and 45 deletions
Download Patch File Download Diff File Expand all files Collapse all files

38
app/DD-Record-Organiser/frmConstructor_Main.Designer.vb generated
View File

@@ -61,11 +61,11 @@ Partial Class frmConstructor_Main
Me.ContextMenuStripResultFiles = New System.Windows.Forms.ContextMenuStrip() Me.ContextMenuStripResultFiles = New System.Windows.Forms.ContextMenuStrip()
Me.DateiÖffnenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.DateiÖffnenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.ToolStripSeparator7 = New System.Windows.Forms.ToolStripSeparator() Me.ToolStripSeparator7 = New System.Windows.Forms.ToolStripSeparator()
Me.KopierenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.CopyToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.ToolStripSeparator8 = New System.Windows.Forms.ToolStripSeparator() Me.ToolStripSeparator8 = New System.Windows.Forms.ToolStripSeparator()
Me.LöschenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.DeleteToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.ToolStripSeparator9 = New System.Windows.Forms.ToolStripSeparator() Me.ToolStripSeparator9 = New System.Windows.Forms.ToolStripSeparator()
Me.EigenschaftenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.PropertiesToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.GridViewDoc_Search = New DevExpress.XtraGrid.Views.Grid.GridView() Me.GridViewDoc_Search = New DevExpress.XtraGrid.Views.Grid.GridView()
Me.AxObjectListControl = New AxOBJECTLISTCONTROLLib.AxObjectListControl() Me.AxObjectListControl = New AxOBJECTLISTCONTROLLib.AxObjectListControl()
Me.ToolStripDokumente = New System.Windows.Forms.ToolStrip() Me.ToolStripDokumente = New System.Windows.Forms.ToolStrip()
@@ -452,7 +452,7 @@ Partial Class frmConstructor_Main
' '
'ContextMenuStripResultFiles 'ContextMenuStripResultFiles
' '
Me.ContextMenuStripResultFiles.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.DateiÖffnenToolStripMenuItem, Me.ToolStripSeparator7, Me.KopierenToolStripMenuItem, Me.ToolStripSeparator8, Me.LöschenToolStripMenuItem, Me.ToolStripSeparator9, Me.EigenschaftenToolStripMenuItem}) Me.ContextMenuStripResultFiles.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.DateiÖffnenToolStripMenuItem, Me.ToolStripSeparator7, Me.CopyToolStripMenuItem, Me.ToolStripSeparator8, Me.DeleteToolStripMenuItem, Me.ToolStripSeparator9, Me.PropertiesToolStripMenuItem})
Me.ContextMenuStripResultFiles.Name = "ContextMenuStripResultFiles" Me.ContextMenuStripResultFiles.Name = "ContextMenuStripResultFiles"
resources.ApplyResources(Me.ContextMenuStripResultFiles, "ContextMenuStripResultFiles") resources.ApplyResources(Me.ContextMenuStripResultFiles, "ContextMenuStripResultFiles")
' '
@@ -466,33 +466,33 @@ Partial Class frmConstructor_Main
Me.ToolStripSeparator7.Name = "ToolStripSeparator7" Me.ToolStripSeparator7.Name = "ToolStripSeparator7"
resources.ApplyResources(Me.ToolStripSeparator7, "ToolStripSeparator7") resources.ApplyResources(Me.ToolStripSeparator7, "ToolStripSeparator7")
' '
'KopierenToolStripMenuItem 'CopyToolStripMenuItem
' '
Me.KopierenToolStripMenuItem.Image = Global.DD_Record_Organiser.My.Resources.Resources.Copy_6524 Me.CopyToolStripMenuItem.Image = Global.DD_Record_Organiser.My.Resources.Resources.Copy_6524
Me.KopierenToolStripMenuItem.Name = "KopierenToolStripMenuItem" Me.CopyToolStripMenuItem.Name = "CopyToolStripMenuItem"
resources.ApplyResources(Me.KopierenToolStripMenuItem, "KopierenToolStripMenuItem") resources.ApplyResources(Me.CopyToolStripMenuItem, "CopyToolStripMenuItem")
' '
'ToolStripSeparator8 'ToolStripSeparator8
' '
Me.ToolStripSeparator8.Name = "ToolStripSeparator8" Me.ToolStripSeparator8.Name = "ToolStripSeparator8"
resources.ApplyResources(Me.ToolStripSeparator8, "ToolStripSeparator8") resources.ApplyResources(Me.ToolStripSeparator8, "ToolStripSeparator8")
' '
'LöschenToolStripMenuItem 'DeleteToolStripMenuItem
' '
Me.LöschenToolStripMenuItem.Image = Global.DD_Record_Organiser.My.Resources.Resources.delete Me.DeleteToolStripMenuItem.Image = Global.DD_Record_Organiser.My.Resources.Resources.delete
Me.LöschenToolStripMenuItem.Name = "LöschenToolStripMenuItem" Me.DeleteToolStripMenuItem.Name = "DeleteToolStripMenuItem"
resources.ApplyResources(Me.LöschenToolStripMenuItem, "LöschenToolStripMenuItem") resources.ApplyResources(Me.DeleteToolStripMenuItem, "DeleteToolStripMenuItem")
' '
'ToolStripSeparator9 'ToolStripSeparator9
' '
Me.ToolStripSeparator9.Name = "ToolStripSeparator9" Me.ToolStripSeparator9.Name = "ToolStripSeparator9"
resources.ApplyResources(Me.ToolStripSeparator9, "ToolStripSeparator9") resources.ApplyResources(Me.ToolStripSeparator9, "ToolStripSeparator9")
' '
'EigenschaftenToolStripMenuItem 'PropertiesToolStripMenuItem
' '
Me.EigenschaftenToolStripMenuItem.Image = Global.DD_Record_Organiser.My.Resources.Resources.PropertyGridEditorPart_6041 Me.PropertiesToolStripMenuItem.Image = Global.DD_Record_Organiser.My.Resources.Resources.PropertyGridEditorPart_6041
Me.EigenschaftenToolStripMenuItem.Name = "EigenschaftenToolStripMenuItem" Me.PropertiesToolStripMenuItem.Name = "PropertiesToolStripMenuItem"
resources.ApplyResources(Me.EigenschaftenToolStripMenuItem, "EigenschaftenToolStripMenuItem") resources.ApplyResources(Me.PropertiesToolStripMenuItem, "PropertiesToolStripMenuItem")
' '
'GridViewDoc_Search 'GridViewDoc_Search
' '
@@ -1227,9 +1227,9 @@ Partial Class frmConstructor_Main
Friend WithEvents ContextMenuStripResultFiles As System.Windows.Forms.ContextMenuStrip Friend WithEvents ContextMenuStripResultFiles As System.Windows.Forms.ContextMenuStrip
Friend WithEvents DateiÖffnenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents DateiÖffnenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents ToolStripSeparator7 As System.Windows.Forms.ToolStripSeparator Friend WithEvents ToolStripSeparator7 As System.Windows.Forms.ToolStripSeparator
Friend WithEvents KopierenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents CopyToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents ToolStripSeparator8 As System.Windows.Forms.ToolStripSeparator Friend WithEvents ToolStripSeparator8 As System.Windows.Forms.ToolStripSeparator
Friend WithEvents LöschenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents DeleteToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents ToolStripSeparator9 As System.Windows.Forms.ToolStripSeparator Friend WithEvents ToolStripSeparator9 As System.Windows.Forms.ToolStripSeparator
Friend WithEvents EigenschaftenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents PropertiesToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
End Class End Class

46
app/DD-Record-Organiser/frmConstructor_Main.resx
View File

@@ -415,40 +415,40 @@
<value>187, 65</value> <value>187, 65</value>
</metadata> </metadata>
<data name="DateiÖffnenToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing"> <data name="DateiÖffnenToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
<value>148, 22</value> <value>152, 22</value>
</data> </data>
<data name="DateiÖffnenToolStripMenuItem.Text" xml:space="preserve"> <data name="DateiÖffnenToolStripMenuItem.Text" xml:space="preserve">
<value>Datei Öffnen</value> <value>Datei Öffnen</value>
</data> </data>
<data name="ToolStripSeparator7.Size" type="System.Drawing.Size, System.Drawing"> <data name="ToolStripSeparator7.Size" type="System.Drawing.Size, System.Drawing">
<value>145, 6</value> <value>149, 6</value>
</data> </data>
<data name="KopierenToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing"> <data name="CopyToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
<value>148, 22</value> <value>152, 22</value>
</data> </data>
<data name="KopierenToolStripMenuItem.Text" xml:space="preserve"> <data name="CopyToolStripMenuItem.Text" xml:space="preserve">
<value>Kopieren</value> <value>Kopieren</value>
</data> </data>
<data name="ToolStripSeparator8.Size" type="System.Drawing.Size, System.Drawing"> <data name="ToolStripSeparator8.Size" type="System.Drawing.Size, System.Drawing">
<value>145, 6</value> <value>149, 6</value>
</data> </data>
<data name="LöschenToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing"> <data name="DeleteToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
<value>148, 22</value> <value>152, 22</value>
</data> </data>
<data name="LöschenToolStripMenuItem.Text" xml:space="preserve"> <data name="DeleteToolStripMenuItem.Text" xml:space="preserve">
<value>Löschen</value> <value>Löschen</value>
</data> </data>
<data name="ToolStripSeparator9.Size" type="System.Drawing.Size, System.Drawing"> <data name="ToolStripSeparator9.Size" type="System.Drawing.Size, System.Drawing">
<value>145, 6</value> <value>149, 6</value>
</data> </data>
<data name="EigenschaftenToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing"> <data name="PropertiesToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
<value>148, 22</value> <value>152, 22</value>
</data> </data>
<data name="EigenschaftenToolStripMenuItem.Text" xml:space="preserve"> <data name="PropertiesToolStripMenuItem.Text" xml:space="preserve">
<value>Eigenschaften</value> <value>Eigenschaften</value>
</data> </data>
<data name="ContextMenuStripResultFiles.Size" type="System.Drawing.Size, System.Drawing"> <data name="ContextMenuStripResultFiles.Size" type="System.Drawing.Size, System.Drawing">
<value>149, 110</value> <value>153, 132</value>
</data> </data>
<data name="&gt;&gt;ContextMenuStripResultFiles.Name" xml:space="preserve"> <data name="&gt;&gt;ContextMenuStripResultFiles.Name" xml:space="preserve">
<value>ContextMenuStripResultFiles</value> <value>ContextMenuStripResultFiles</value>
@@ -2375,10 +2375,10 @@
<data name="&gt;&gt;ToolStripSeparator7.Type" xml:space="preserve"> <data name="&gt;&gt;ToolStripSeparator7.Type" xml:space="preserve">
<value>System.Windows.Forms.ToolStripSeparator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> <value>System.Windows.Forms.ToolStripSeparator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data> </data>
<data name="&gt;&gt;KopierenToolStripMenuItem.Name" xml:space="preserve"> <data name="&gt;&gt;CopyToolStripMenuItem.Name" xml:space="preserve">
<value>KopierenToolStripMenuItem</value> <value>CopyToolStripMenuItem</value>
</data> </data>
<data name="&gt;&gt;KopierenToolStripMenuItem.Type" xml:space="preserve"> <data name="&gt;&gt;CopyToolStripMenuItem.Type" xml:space="preserve">
<value>System.Windows.Forms.ToolStripMenuItem, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> <value>System.Windows.Forms.ToolStripMenuItem, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data> </data>
<data name="&gt;&gt;ToolStripSeparator8.Name" xml:space="preserve"> <data name="&gt;&gt;ToolStripSeparator8.Name" xml:space="preserve">
@@ -2387,10 +2387,10 @@
<data name="&gt;&gt;ToolStripSeparator8.Type" xml:space="preserve"> <data name="&gt;&gt;ToolStripSeparator8.Type" xml:space="preserve">
<value>System.Windows.Forms.ToolStripSeparator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> <value>System.Windows.Forms.ToolStripSeparator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data> </data>
<data name="&gt;&gt;LöschenToolStripMenuItem.Name" xml:space="preserve"> <data name="&gt;&gt;DeleteToolStripMenuItem.Name" xml:space="preserve">
<value>LöschenToolStripMenuItem</value> <value>DeleteToolStripMenuItem</value>
</data> </data>
<data name="&gt;&gt;LöschenToolStripMenuItem.Type" xml:space="preserve"> <data name="&gt;&gt;DeleteToolStripMenuItem.Type" xml:space="preserve">
<value>System.Windows.Forms.ToolStripMenuItem, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> <value>System.Windows.Forms.ToolStripMenuItem, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data> </data>
<data name="&gt;&gt;ToolStripSeparator9.Name" xml:space="preserve"> <data name="&gt;&gt;ToolStripSeparator9.Name" xml:space="preserve">
@@ -2399,10 +2399,10 @@
<data name="&gt;&gt;ToolStripSeparator9.Type" xml:space="preserve"> <data name="&gt;&gt;ToolStripSeparator9.Type" xml:space="preserve">
<value>System.Windows.Forms.ToolStripSeparator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> <value>System.Windows.Forms.ToolStripSeparator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data> </data>
<data name="&gt;&gt;EigenschaftenToolStripMenuItem.Name" xml:space="preserve"> <data name="&gt;&gt;PropertiesToolStripMenuItem.Name" xml:space="preserve">
<value>EigenschaftenToolStripMenuItem</value> <value>PropertiesToolStripMenuItem</value>
</data> </data>
<data name="&gt;&gt;EigenschaftenToolStripMenuItem.Type" xml:space="preserve"> <data name="&gt;&gt;PropertiesToolStripMenuItem.Type" xml:space="preserve">
<value>System.Windows.Forms.ToolStripMenuItem, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> <value>System.Windows.Forms.ToolStripMenuItem, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data> </data>
<data name="&gt;&gt;GridViewDoc_Search.Name" xml:space="preserve"> <data name="&gt;&gt;GridViewDoc_Search.Name" xml:space="preserve">

12
app/DD-Record-Organiser/frmConstructor_Main.vb
View File

@@ -718,7 +718,10 @@ Public Class frmConstructor_Main
RIGHT_ONLY_READ = False RIGHT_ONLY_READ = False
tsmi_RecordDelete.Enabled = True tsmi_RecordDelete.Enabled = True
DeleteToolStripMenuItem.Enabled = True
CopyToolStripMenuItem.Enabled = True
RecordKopierenToolStripMenuItem.Enabled = True RecordKopierenToolStripMenuItem.Enabled = True
PropertiesToolStripMenuItem.Enabled = True
tslblLocked.Visible = False tslblLocked.Visible = False
TabFollowUp.PageEnabled = True TabFollowUp.PageEnabled = True
Dim tempsql Dim tempsql
@@ -758,6 +761,9 @@ Public Class frmConstructor_Main
tsButtonSave.Enabled = False tsButtonSave.Enabled = False
tsButtonDelete.Enabled = False tsButtonDelete.Enabled = False
tsmi_RecordDelete.Enabled = False tsmi_RecordDelete.Enabled = False
PropertiesToolStripMenuItem.Enabled = False
CopyToolStripMenuItem.Enabled = False
DeleteToolStripMenuItem.Enabled = False
tslblLocked.Visible = True tslblLocked.Visible = True
RecordKopierenToolStripMenuItem.Enabled = False RecordKopierenToolStripMenuItem.Enabled = False
TabFollowUp.PageEnabled = False TabFollowUp.PageEnabled = False
@@ -4715,7 +4721,7 @@ Public Class frmConstructor_Main
Delete_Record() Delete_Record()
End Sub End Sub
Private Sub KopierenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles KopierenToolStripMenuItem.Click Private Sub KopierenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles CopyToolStripMenuItem.Click
If RESULT_DOC_PATH <> Nothing Then If RESULT_DOC_PATH <> Nothing Then
Try Try
Dim selectedfile(0) As String Dim selectedfile(0) As String
@@ -4744,7 +4750,7 @@ Public Class frmConstructor_Main
End Sub End Sub
Private Sub LöschenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles LöschenToolStripMenuItem.Click Private Sub LöschenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles DeleteToolStripMenuItem.Click
If RESULT_DOC_PATH <> Nothing Then If RESULT_DOC_PATH <> Nothing Then
Dim msg = "Sind Sie sicher, dass Sie diese Dateien löschen wollen?" Dim msg = "Sind Sie sicher, dass Sie diese Dateien löschen wollen?"
If USER_LANGUAGE <> "de-DE" Then If USER_LANGUAGE <> "de-DE" Then
@@ -4769,7 +4775,7 @@ Public Class frmConstructor_Main
End Sub End Sub
Private Sub EigenschaftenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles EigenschaftenToolStripMenuItem.Click Private Sub EigenschaftenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles PropertiesToolStripMenuItem.Click
If RESULT_DOC_PATH <> Nothing Then If RESULT_DOC_PATH <> Nothing Then
Cursor = Cursors.WaitCursor Cursor = Cursors.WaitCursor
Dim sei As New SHELLEXECUTEINFO Dim sei As New SHELLEXECUTEINFO