> > Variant - 2 > Delete all previously posted > DispPage( acItems, alSelect, nTop, nLeft, nRight, nNumRows, 0, nAtTop, > nItems, bSelect, nRowsClr ) > lines > and add in all CASE entry before lFinished := .T. (7-lines) and before nPos > := 0 (if exist) > [...] > + DispLine( acItems[ nPos ], nTop + ( nPos - nAtTop ), nLeft, .T., > .F., nNumCols ) > nPos := 0 > lFinished := .T. > [...] > add 7 lines of code, but redraw only one current line > > > I test both (OK), with extended (added NIL, EMPTY, NUMERIC array values, > and UserFunction) previously posted
Variant #2 seems more optimal, as it only redraws one item, not the whole page. Question what happens when nPos is zero at this point, can it happen? Brgds, Viktor
_______________________________________________ Harbour mailing list [email protected] http://lists.harbour-project.org/mailman/listinfo/harbour
