☆☆☆__sunking的专栏__☆☆☆

经历风雨见彩虹! Attic faith

pb数据窗口回车替换Tab,上下键的处理.

pb数据窗口回车替换Tab,上下键的处理.:

在datawindow中见userevent  选择pb_dwnprocessenter 事件名称key;代码如下:

 if   keydown(keyenter!)   then  
       Send(Handle(this),256,9,Long(0,0))       //发送TAB键  
      Return   1  //取消原ENTER键的动作  
 end   if     

使用windwosuser32.dll

声明全局函数:

//global external functions  中定义一个API:
Subroutine keybd_event(int bVk,int bScan,ulong dwFlags,ulong dwExtraInfo) LIBRARY "user32.dll"
  再在datawindow建一事件ue_keydown 代码如下:

If   key   =   KeyEnter!   Or   Key   =   KeyRightArrow!   Then  
 keybd_event   (   9,   0,   0   ,   0   )           //   按下tab  
 keybd_event   (   9,   0,   2,   0   )                             //   释放tab  
 Return   1  
End   If  

If   Key   =   KeyleftArrow!   Then  
 keybd_event   (   16,   0,   0,   0   )           //   按下shift  
 keybd_event   (   9,   0,   0   ,   0   )           //   按下tab  
 keybd_event   (   9,   0,   2,   0   )                             //   释放tab  
 keybd_event   (   16,   0,   2,   0   )           //   释放shift  
 Return   1  
End   If  

 

一切ok

阅读更多
个人分类: 数据库 Powerbuilder
上一篇很久没来了,没有给朋友们回复.在这给大家道歉了。
下一篇工作流模型分析:::一位网友Email给我的。给大家共享.需要图片的请email:gutengcom@hotmail.com
想对作者说点什么? 我来说一句

没有更多推荐了,返回首页

关闭
关闭