jj_26_01_16

2016-01-26 13:38:52 +01:00
parent a7b5fcfd75
commit d90fcc9605
12 changed files with 121 additions and 46 deletions
--- a/app/DD-Record-Organiser/frmForm_Input.vb
+++ b/app/DD-Record-Organiser/frmForm_Input.vb
@@ -530,7 +530,7 @@ Public Class frmFormInput
        Dim MenuItem = DirectCast(sender, ToolStripMenuItem)
        Dim ContextMenu As ContextMenuStrip = MenuItem.Owner
        Dim SourceControl As Control = ContextMenu.SourceControl
-        Dim MasterDataId As Integer = SourceControl.Tag
+        Dim MasterDataId As Integer = DirectCast(SourceControl.Tag, ClassControlMetadata).Id

        frmQuickInput.ShowDialog()
    End Sub