TC官方合作论坛

标题: 实现TAB切换控件焦点问题,必采纳 [打印本页]

作者: cjxdn 时间: 2014-12-24 09:08
标题: 实现TAB切换控件焦点问题,必采纳
比如界面上有6个控件 1 2 3 4 5 6
我想123 为1组这3个相互切换 456为另一组这3个相互切换

//很多同学说文档里面全部是中文代码没有英文代码
//所以这个示例给大家以中英文代码混写展示

空间实现TAB切换控件焦点
//默认空间
WM_KEYDOWN=256//按下一个键
WM_KEYUP=257//释放一个键
WM_SETFOCUS=7//获得焦点后
WM_KILLFOCUS=8//失去焦点

VK_TAB=9//TAB

//上面的消息以及一些键盘的常量定义大家可以参考文档里面的第12章 ASCII表与虚拟键码表

max=3//控件的数量
控件名=数组[1]//控件的名字最好定义在统一的方便代码的实现
//也可以把控件名写到一个数组里面也是可以的

功能初始化()
//这里添加你要执行的代码
控件名=数组空间.重定义(控件名,1,max)//重新构造数组大小
控件名[0]="编辑框0"
控件名[1]="编辑框1"
控件名[2]="编辑框2"

功能结束
//消息路由功能
功能实现TAB切换控件焦点_消息路由(句柄,消息,w参数,l参数,时间,x坐标,y坐标)

选择(消息)
      条件 256://WM_KEYDOWN select的条件不能为变量只能为常量
      如果(w参数==VK_TAB)//当按下TAB键的时候设置下一个控件的焦点
         遍历(i=0;i<max;i++)//用循环遍历当前焦点所在的控件
            如果(句柄==控件.获得句柄(控件名[i]))
                  如果(i==(max-1))//如果当前是最后一个控件,自动把焦点移动到第一个控件
                     window.setfocus(control.gethandle(控件名[0]))
                     返回真//处理完成后必须直接返回真,否则不能正常执行
                  如果结束
                  窗口.设置焦点(控件.获得句柄(控件名[i+1]))//设置下一个控件的焦点
                  返回真//处理完成后必须直接返回真,否则不能正常执行
            如果结束
         遍历结束
      如果结束
选择结束
返回假

功能结束

空间结束
//空间结束语句

本人菜鸟,麻烦大神们给个实例源码.

作者: cjxdn 时间: 2014-12-25 10:09

欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/)