VAR Style INIT WIN_WS_CHILD + WIN_WS_BORDER + WIN_WS_TABSTOP + WIN_WS_VSCROLL + CBS_NOINTEGRALHEIGHT + CBS_AUTOHSCROLL + CBS_DROPDOWNLIST
VAR lSetCallback INIT .F.
METHOD AddItem( cText ) INLINE AAdd( ::aComboboxList, cText ), ::SendMessage( CB_ADDSTRING, 0, @::aComboboxList[ Len( ::aComboboxList ) ] )
Já desliguei a captura de evento e alterei o texto pra pointer
IF ::lSetCallback
::SetWindowProcCallback() /* Let parent take control of it */
ENDIF
Os valores estão no combo, conforme altero a opção (SetValue) o texto se altera.
O problema é: clico no scroll, mas não aparece a lista pra selecionar.
oControl := wvgtstComboBox():New()
oControl:Create( , , { -7.5, -43 }, { -6, -17 } )
AEval( aComboboxList, { | e | oControl:AddItem( e ) } )
oControl:SetValue( 5 )
O que pode estar errado?