get combobox
Posted: Mon Aug 27, 2018 5:34 amThe get object in combobox does not jump to next control when len get full.
What to do?
What to do?
Try this:
oCombo:bChange = { || If( oCombo:oGet:TypeOut, oCombo:oWnd:GoNextCtrl( oCombo:hWnd ),) }
FiveTech Software tech support forums
www.FiveTechSoft.com
https://forums.fivetechsupport.com/
get combobox
https://forums.fivetechsupport.com/viewtopic.php?f=3&t=36010
Page 1 of 1
Posted: Mon Aug 27, 2018 5:34 amRe: get combobox
Posted: Mon Aug 27, 2018 8:07 amRe: get combobox
Posted: Mon Aug 27, 2018 4:17 pmAntonio Linares wrote:Try this:
oCombo:bChange = { || If( oCombo:oGet:TypeOut, oCombo:oWnd:GoNextCtrl( oCombo:hWnd ),) }
Not Solved...
little change in code: "oGet:TypeOut" for "oGet:oGet:TypeOut", but, not go next control.
text in oGet is full select and do not go next.
see in image:
Re: get combobox
Posted: Mon Aug 27, 2018 4:29 pmPlease check if you ear the beep:
oCombo:bChange = { || If( oCombo:oGet:oGet:TypeOut, ( MsgBeep(), oCombo:oWnd:GoNextCtrl( oCombo:hWnd ) ),) }
oCombo:bChange = { || If( oCombo:oGet:oGet:TypeOut, ( MsgBeep(), oCombo:oWnd:GoNextCtrl( oCombo:hWnd ) ),) }
Re: get combobox
Posted: Fri Aug 31, 2018 5:57 pmAntonio Linares wrote:Please check if you ear the beep:
oCombo:bChange = { || If( oCombo:oGet:oGet:TypeOut, ( MsgBeep(), oCombo:oWnd:GoNextCtrl( oCombo:hWnd ) ),) }
No Beep. Not call function.
Re: get combobox
Posted: Thu Sep 27, 2018 5:23 amAny Solution ???
Re: get combobox
Posted: Thu Sep 27, 2018 5:42 amThis command line bellow, call alert function, it´s ok. But... don´t execute GoNextCtrl()
oCombo:bChange = { || If( oCombo:oGet:oGet:TypeOut, ( alert("test"), oCombo:oWnd:GoNextCtrl( oCombo:hWnd ) ),) }
Any Solution?
oCombo:bChange = { || If( oCombo:oGet:oGet:TypeOut, ( alert("test"), oCombo:oWnd:GoNextCtrl( oCombo:hWnd ) ),) }
Any Solution?
Re: get combobox
Posted: Thu Sep 27, 2018 7:23 ampress ENTER key, do not execute GoNextCtrl too.
for solve this problem, I changed Method GetKeyChar() in TComboBox Class.
for solve this problem, I changed Method GetKeyChar() in TComboBox Class.
- Code: Select all Expand view
- //----------------------------------------------------------------------------//
METHOD GetKeyChar( nKey ) CLASS TComboBox
local nAt, cText
local cSearch
if nKey == VK_RETURN // CHANGED HERE BY SHARK
::oWnd:GoNextCtrl( ::hWnd )
return nKey // changed here by shark
elseif ( nKey == VK_TAB .and. ! GetKeyState( VK_SHIFT ) )
::oWnd:GoNextCtrl( ::hWnd )
return 0
else
if nKey == VK_TAB .and. GetKeyState( VK_SHIFT )
::oWnd:GoPrevCtrl( ::hWnd )
return 0
endif
endif