For some reason nobody replied. Anyway, I've done some additional research and have discovered that it happens in VFP7/WinNT and VFP7/WinXP, so in VFP7 (SP1), but no longer in VFP8 and VFP9.
Hope this is a useful addition to this 'knowledgebase'.
>I (think I) have a normal listbox. At first the selected item is beautifully refreshed when I choose another one from the dropped down list. But after some other action, that no longer happens, at least not without leaving the control. I can still select from the dropped down list, but the selected item won't immediately refresh.
>
>The code hereunder should demonstrate this. If the INKEY line is commented, then all continues to work fine.
>
>Is this a bug?
>
>
lox = createobject( 'form1' )
>lox.show()
>read events
>
>DEFINE CLASS form1 AS form
>
> DoCreate = .T.
> Caption = "Form1"
> Name = "Form1"
>
> ADD OBJECT cboText AS combobox WITH ;
> FontBold = .T., ;
> Height = 24, ;
> Left = 78, ;
> Style = 2, ;
> Top = 42, ;
> Width = 79, ;
> Name = "cboText"
>
> ADD OBJECT command1 AS commandbutton WITH ;
> Top = 60, ;
> Left = 234, ;
> Height = 27, ;
> Width = 84, ;
> Cancel = .T., ;
> Caption = "Exit", ;
> Name = "Command1"
>
>
> ADD OBJECT command2 AS commandbutton WITH ;
> Top = 138, ;
> Left = 132, ;
> Height = 27, ;
> Width = 84, ;
> Caption = "Trouble", ;
> Name = "Command2"
>
>
> PROCEDURE cboText.Init
> select text from _samples + 'solution\solution' into cursor c_sol
>
> with this
> .rowsourcetype = 2
> .rowsource = 'c_sol'
> endwith
> ENDPROC
>
> PROCEDURE command1.Click
> thisform.release()
> clear events
> ENDPROC
>
> PROCEDURE Destroy
> use in select( 'c_sol' )
> ENDPROC
>
> PROCEDURE command2.Click
> DEFINE Window Therm from 1,1 to 10,10
> acti wind therm
> =INKEY( 2 ), 'H' )
> rele wind therm
> ENDPROC
>
>ENDDEFINE
Groet,
Peter de Valença
Constructive frustration is the breeding ground of genius.
If there’s no willingness to moderate for the sake of good debate, then I have no willingness to debate at all.
Let's develop superb standards that will end the holy wars.
"There are three types of people: Alphas and Betas", said the beta decisively.
If you find this message rude or offensive or stupid, please take a step away from the keyboard and try to think calmly about an eventual a possible alternative explanation of my message.