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

LookupGrid: Raise Event after setting all properties

Browse Source
This commit is contained in:
Jonathan Jenne
2019-06-11 12:51:26 +02:00
parent f50c795362
commit 91c02adea0
1 changed files with 4 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
Controls.LookupGrid/LookupControl2.vb
View File

@@ -135,12 +135,6 @@ Public Class LookupControl2
Values.RemoveAll(Function(v) String.IsNullOrEmpty(v)) 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 If MultiSelect = True Then
Properties.DataSource = Values Properties.DataSource = Values
@@ -157,6 +151,10 @@ Public Class LookupControl2
Text = Values.FirstOrDefault() Text = Values.FirstOrDefault()
EditValue = Nothing EditValue = Nothing
End If End If
_SelectedValues = Values
RaiseEvent SelectedValuesChanged(Me, Values)
End Sub End Sub
Private Function GetLookupForm() As frmLookupGrid Private Function GetLookupForm() As frmLookupGrid