LookupGrid: Raise Event after setting all properties

This commit is contained in:
Jonathan Jenne 2019-06-11 12:51:26 +02:00
parent f50c795362
commit 91c02adea0

View File

@ -135,12 +135,6 @@ Public Class LookupControl2
Values.RemoveAll(Function(v) String.IsNullOrEmpty(v))
' Update selected values before changing edit value
' in case EditValueChanged event is used to detect changes
_SelectedValues = Values
RaiseEvent SelectedValuesChanged(Me, Values)
If MultiSelect = True Then
Properties.DataSource = Values
@ -157,6 +151,10 @@ Public Class LookupControl2
Text = Values.FirstOrDefault()
EditValue = Nothing
End If
_SelectedValues = Values
RaiseEvent SelectedValuesChanged(Me, Values)
End Sub
Private Function GetLookupForm() As frmLookupGrid