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

jj: fix bug in CheckWrite_IndexeMan

Browse Source
This commit is contained in:
Jonathan Jenne 2018-08-23 16:45:38 +02:00
parent 433155e804
commit 073ecb9084
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
Global_Indexer/frmIndex.vb
View File

@ -544,6 +544,7 @@ Public Class frmIndex
Const LOOKUP_CONTROL_HEIGHT As Integer = 24
Dim lookupButton As New Button()
lookupButton.Name = "btnLookup" & indexname
lookupButton.Location = New Point(311, y - 1)
lookupButton.Size = New Size(LOOKUP_CONTROL_HEIGHT, LOOKUP_CONTROL_HEIGHT)
lookupButton.Image = My.Resources.gear_32xSM
@ -905,7 +906,7 @@ Public Class frmIndex
End If
End If
If ctrl.Name.StartsWith("cmbMulti") Then
Dim cmbMulti As DevExpress.XtraEditors.LookUpEdit = ctrl
Dim cmbMulti As DevExpress.XtraEditors.GridLookUpEdit = ctrl
If cmbMulti.Text = "" Then
Dim optional_index As Boolean = ClassDatabase.Execute_Scalar("SELECT OPTIONAL FROM TBDD_INDEX_MAN WHERE DOK_ID = " & dokartid & " AND NAME = '" & Replace(cmbMulti.Name, "cmbMulti", "") & "'", MyConnectionString, True)