Tim,
It seems as you are using a wrong combobox.prg as samples/ownerdra.prg is working fine here
If you try samples/ownerdra.prg and works wrong also there, it would confirm it.
Tim,
It seems as you are using a wrong combobox.prg as samples/ownerdra.prg is working fine here
If you try samples/ownerdra.prg and works wrong also there, it would confirm it.
Antonio,
On this thread you posted the very latest combobox.prg. That is the code I have linked into my program.
Tim
Tim,
Please go to samples and do:
buildh32.bat ownerdra
and let me know how it behaves, thanks
You can copy the contents of combobox.prg at the end of ownerdra.prg
Antonio,
In the Ownerdrw.prg test program, after the ACTIVATE, add these two lines:
MsgInfo( cItem2 )
MsgInfo( cItem4 )
Both of these variables are LOCAL to Main( ) so they will exist with their set values
Then run the program and modify the selections in the two comboboxes.
Now read the result. The values I see do not make sense.
Tim
METHOD LostFocus( hWndGetFocus ) CLASS TComboBox
local nAt := ::SendMsg( CB_GETCURSEL )
::Super:LostFocus( hWndGetFocus )
if nAt != CB_ERR
::nAt = nAt + 1
if ValType( Eval( ::bSetGet ) ) == "N"
Eval( ::bSetGet, nAt + 1 )
else
if Empty( ::oGet:hWnd )
Eval( ::bSetGet, ::aItems[ nAt + 1 ] )
else
Eval( ::bSetGet, GetWindowText( ::hWnd ) )
endif
endif
else
Eval( ::bSetGet, GetWindowText( ::hWnd ) )
endif
return nilThank you. I will be out today but will apply it tonight
The problem is solved. Thank you.