On Wed, 11 Mar 2009, Vladislav Lavrecky wrote: Hi,
> achoice with additional redraw on exit are ok > I test it previously, but in my message just an example > To fix achoice we need to add > + DispPage( acItems, alSelect, nTop, nLeft, nRight, nNumRows, 0, nAtTop, > nItems, bSelect, nRowsClr ) > in all CASE items where lFinished := .T. > or IMO better > add one redraw line before exit from achoice function > [...] > ENDDO > + DispPage( acItems, alSelect, nTop, nLeft, nRight, nNumRows, 0, nAtTop, > nItems, bSelect, nRowsClr ) > SetCursor( nSaveCsr ) > > RETURN nPos > [...] Can you create a small .prg example which illustrates achoice() incompatibilities? We can put it in tests/ directory so it can be used to verify future modifications. best regards, Przemek _______________________________________________ Harbour mailing list [email protected] http://lists.harbour-project.org/mailman/listinfo/harbour
