Incremental Search on Combobox dropdown (not dropdownlist)

[Rick Lipkin]

To All

I have searched the forum and I see several subjects on this topic, however, I do not seem to find an answer ?

I have no problem using DropDownList .. however, I need to be able have it search like CBS_DROPDOWN. The reason is because if the value is not found in the array, I want to be able to manually type it in... FWH 1203.

Thanks
Rick Lipkin

ps .. I noticed that in the DropDownList .. only the first character is evaluated

[MarcoBoschi]

Try this

Code: Select all  Expand view

#include "fivewin.ch"
FUNCTION MAIN
LOCAL oDlg
LOCAL oGet, cGet := "   "
LOCAL oCombo, cCombo := "                                 "
LOCAL aItems := { "ANDREA                           " , ;
                  "ANTONIO                          " , ;
                  "BARBARA                          " , ;
                  "BEPPE                            " , ;
                  "BIRILLO                          " , ;
                  "BIROLLO                          " , ;
                  "BIRULLO                          " , ;
                  "CAVALIERE                        " , ;
                  "CAVALLO                          " , ;
                  "DEMETRIO                         " }


DEFINE DIALOG oDlg FROM 10 , 10 TO 20 , 60

@ 1 , 1 COMBOBOX oCombo VAR cCombo OF oDLG ITEMS aItems STYLE CBS_DROPDOWN SIZE 100 , 200
@ 1 , 20 GET oGet VAR cGet OF oDlg

oCombo:lIncSearch := .T.
oCombo:oGet:bKeyChar = { | nKey | oCombo:KeyChar( nKey ) }

ACTIVATE DIALOG oDlg CENTER

RETURN NIL
 

[Rick Lipkin]

Marco

Thank you for your suggestion .. I did see this example and to some extent it works but you have to open the drop down and type your value and if it is not found it returns some unwanted symbols.

Rick Lipkin

[MarcoBoschi]

Rick,
here it works fine.
I believe you.
Version problems?
let's wait for another suggestion from some developer
marco

[Gale FORd]

This is untested but you may be able to drop down the list when first key is pressed.
oCombo:oGet:bKeyChar = { | nKey | if( oCombo:IsClosed(), oCombo:Open(), nil), oCombo:KeyChar( nKey ) }

[James Bott]

Marco,

Did you see this thread: http://forums.fivetechsupport.com/viewtopic.php?f=3&t=21772&p=115862&hilit=combobox#p115862

Regards,
James