PC Toledo

Código: Selecionar todos

METHOD LINEDOWN( lMouse ) CLASS HBrowse

   LOCAL minPos, maxPos, nPos, colpos

   IF Eval( ::bSkip, Self, 1 ) == 0 .or. Eval( ::bEof, Self ) 

      IF ::type == BRW_DATABASE
         Eval( ::bSkip, Self, - 1 ) 
      ELSEIF ::type == BRW_ARRAY
         Eval( ::bGoBot, Self )
      ENDIF