DropDown - AutoCompleting Event
Fired as a value is being edited allowing for a replacement value to be returned
Member of DropDown (PRIM_MD.Dropdown)
Parameters
Name | Type | Data Type | Description |
|---|---|---|---|
Value | *Both | Unicode String | Current value and the replacement value to return |
Handled | *Both | Boolean | Set to true to stop the value being automatically updated control |
Details
The AutoCompleting event provides an opportunity for the value to be completed as the user types.
The value entered is passed in to the event via the Value parameter. The value can then be modified and returned to the edit.
Selection of characters within the edit is managed automatically.
Example
In this example, the set of available items in the drop down is filtered based on the value entered.
Begin_Com Role(*EXTENDS #PRIM_WEB) Height(456) Width(864)
Define_Com Class(#PRIM_MD.DropDown) Name(#DropDown) ColumnHeaderHeight(0) DisplayPosition(1) Label('Filter Numbers') Left(8) Parent(#COM_OWNER) PromptIcon('arrow_drop_down') RowLines(False) TabPosition(1) Top(8) DropDownPosition(Bottom) DropDownStyle(DropDown)
Define_Com Class(#PRIM_MD.DataTableString) Name(#DropDownColumn) ColumnResize(False) ColumnUnits(Proportion) ColumnWidth(1) DisplayPosition(1) Parent(#DropDown)
Evtroutine Handling(#Com_owner.CreateInstance)
Begin_Loop To(100)
Add_Entry To_List(#DropDown)
#DropDown.CurrentItem.Value := ("Item &1").Substitute( #DropDown.Items.ItemCount.AsString )
End_Loop
Endroutine
Evtroutine Handling(#DropDown.AutoCompleting) Value(#Value) Handled(#Handled)
#Handled := True
Selectlist Named(#DropDown)
#DropDownColumn.CurrentItem.Visible := #DropDownColumn.CurrentItem.Value.Contains( #Value )
Endselect
Endroutine
End_Com