This commit is contained in:
2022-01-19 11:40:31 +01:00
parent 9287630dfb
commit fcdeeb12ae
75 changed files with 6011 additions and 3577 deletions

View File

@@ -469,9 +469,6 @@ Public Class frmWM_IndexFile
End If
End If
End If
Dim oeditvalue = LookUpEdit1.EditValue
Dim otext = LookUpEdit1.Text
If cmbDokumentart.SelectedIndex <> -1 Then
My.Settings.WD_INDEXDOKART_SAVE = cmbDokumentart.Text
My.Settings.Save()
@@ -1231,9 +1228,7 @@ Public Class frmWM_IndexFile
cmbDokumentart.DataSource = DTVWPMO_DOKUMENTTYPES
cmbDokumentart.DisplayMember = DTVWPMO_DOKUMENTTYPES.Columns(4).ColumnName
cmbDokumentart.ValueMember = DTVWPMO_DOKUMENTTYPES.Columns(3).ColumnName
LookUpEdit1.Properties.DataSource = DTVWPMO_DOKUMENTTYPES
LookUpEdit1.Properties.DisplayMember = DTVWPMO_DOKUMENTTYPES.Columns(4).ColumnName
LookUpEdit1.Properties.ValueMember = DTVWPMO_DOKUMENTTYPES.Columns(3).ColumnName
If DTVWPMO_DOKUMENTTYPES.Rows.Count = 1 Then
cmbDokumentart.SelectedIndex = 0
CURRENT_DOKARTID = cmbDokumentart.SelectedValue