Val编程-按键响应模式

由于Val是通过语句gotoxy函数来进行光标移动的,不支持触摸屏与鼠标,因此对于其界面编程有很大的局限。
一般有下面几种模式来进行编程。
1.按键响应模式(中断模式)
2.轮询模式

一般推荐使用按键响应模式。其原理是对于有按键按下时,界面进行相应的刷新。

常用按键有F1,F2,F3,F4,F5,F6,F7,F8,Enter,ESC, up,down,left,right 这14个按键进行响应

begin
  //清除界面
  cls()
  //界面刷新函数
  call OnRefreshScreen()
  
  //如果不退出,则进行一直在循环
  while l_bExit
    //默认刷新界面
    l_bRefresh=true
    //获取按键值
    l_nKeyValue=getKey()
    switch l_nKeyValue
      //按键Esc响应函数
      case 255
        call OnEsc()
      break
      //按键导航键向上响应函数
      case 261
        call OnUp()
      break
      //按键导航键向下响应函数
      case 266
        call OnDown()
      break
      //按键导航键向左响应函数
      case 264
        call OnLeft()
      break 
      //按键导航键向右响应函数
      case 268
        call OnRight()
      break    
      //按键回车键响应函数
      //******************
      //常用
      case 270
        call OnEnter()
      break
      //按键功能键F1响应函数
      case 271
        call OnF1()
      break 
      //按键功能键F2响应函数      
      case 272
        call OnF2()
      break
      //按键功能键F3响应函数      
      case 273
        call OnF3()
      break  
      //按键功能键F4响应函数      
      case 274
        call OnF4()
      break 
      //按键功能键F5响应函数      
      case 275
        call OnF5()
      break
      //按键功能键F6响应函数      
      case 276
        call OnF6()
      break   
      //按键功能键F7响应函数      
      case 277
        call OnF7()
      break
      //按键功能键F8响应函数      
      case 278
        call OnF8()
      break        
      
      default
        l_bRefresh=false
      break
      
    endSwitch
    
    if l_bRefresh
      
      //界面刷新函数
      call OnRefreshScreen()
      
    endIf
    delay(0)
  endWhile
  
  
end

说明:
1.对于获取按键函数get()与getkey()的区别
2.getkey()按键不灵敏的说明
3.界面闪屏的问题的说明与处理

你可能感兴趣的:(Val编程-按键响应模式)