//---------------------------------------------------//
     CASE ( klaw == K_UP )   ; o:Up()  ;if rek>1 ;rek:=rek-1 ; endif
     CASE ( klaw == K_DOWN ) ; o:Down() ;if rek<kon ;rek:=rek+1 ; endif 
     CASE ( klaw == K_PGUP ) ; o:pageUp() ; if rek>1
          if rek-okn >=0 ; rek:=rek-okn ; else;rek:=1 ; endif
                                             endif
     CASE ( klaw == K_PGDN ) ; o:pageDown() ; if rek<kon
     if kon-rek >=okn  ; rek:=rek+okn ; else ; rek:=kon ; endif
                                             endif
     CASE ( klaw == K_HOME ) ; o:GoTop() ; rek:=1
     CASE ( klaw == K_END )  ; o:GoBottom() ; rek:=kon
     //---------------------------------------------------//