get combobox

get combobox

Postby shark » Mon Aug 27, 2018 5:34 am

The get object in combobox does not jump to next control when len get full.

What to do?
shark
 
Posts: 55
Joined: Thu Mar 13, 2008 2:35 am

Re: get combobox

Postby Antonio Linares » Mon Aug 27, 2018 8:07 am

Try this:

oCombo:bChange = { || If( oCombo:oGet:TypeOut, oCombo:oWnd:GoNextCtrl( oCombo:hWnd ),) }
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42048
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Re: get combobox

Postby shark » Mon Aug 27, 2018 4:17 pm

Antonio 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:

Image
shark
 
Posts: 55
Joined: Thu Mar 13, 2008 2:35 am

Re: get combobox

Postby Antonio Linares » Mon Aug 27, 2018 4:29 pm

Please check if you ear the beep:

oCombo:bChange = { || If( oCombo:oGet:oGet:TypeOut, ( MsgBeep(), oCombo:oWnd:GoNextCtrl( oCombo:hWnd ) ),) }
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42048
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Re: get combobox

Postby shark » Fri Aug 31, 2018 5:57 pm

Antonio 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.
shark
 
Posts: 55
Joined: Thu Mar 13, 2008 2:35 am

Re: get combobox

Postby shark » Thu Sep 27, 2018 5:23 am

Any Solution ???
shark
 
Posts: 55
Joined: Thu Mar 13, 2008 2:35 am

Re: get combobox

Postby shark » Thu Sep 27, 2018 5:42 am

This 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?
shark
 
Posts: 55
Joined: Thu Mar 13, 2008 2:35 am

Re: get combobox

Postby shark » Thu Sep 27, 2018 7:23 am

press ENTER key, do not execute GoNextCtrl too.

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
shark
 
Posts: 55
Joined: Thu Mar 13, 2008 2:35 am


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: TimStone and 28 guests