On Thu, 12 Mar 2009, Szak�ts Viktor wrote:
> > 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?
Maybe we should simply test what Clipper does?
F.e. overwrite the whole screen in user function
dispbox( 0, 0, maxrow(), maxcol(), repl("#",9), "GR+/G" )
and check what Clipper redraws for different return values,
also non numeric ones.
best regards,
Przemek
_______________________________________________
Harbour mailing list
[email protected]
http://lists.harbour-project.org/mailman/listinfo/harbour