在VFP5.0中实现中英文自动切换
【打印文章】
在用VFP5.0开发应用系统时,结合数据进行处理,应用最多的是文本框对象,特别是进行中英文的输入时,来回切换非常繁琐,所以我们可以借助自定义子类,来实现中英文输入的自动切换。其步骤如下:
通过系统菜单栏“文件/新建/类…”启动“新类”对话框,填入类名:gsTextBox,并设置父类为:TextBox。按“确定”键进入类设计器画面。新增一个属性,来作为对象是否启动中文输入法的控制码。
通过系统菜单栏“类/新建属性…”启动“新建属性”对话框,按上表设置属性,其中可视性设为:公共。最后设置GotFocus与LostFocus事件过程:
Gotfocus Event事件过程:
If this是否中文
=imestatus(1)
else
=imestatus(0)
endif
Lostfocus Event事件过程:
=imestatus(0)
到此,类已经定义完成,以后只要在设计表单时,通过表单控件“工具栏/查看类/添加…”把自定义类加入,并且设置“是否中文”属性即可实现中英文输入的自动切换。
通过系统菜单栏“文件/新建/类…”启动“新类”对话框,填入类名:gsTextBox,并设置父类为:TextBox。按“确定”键进入类设计器画面。新增一个属性,来作为对象是否启动中文输入法的控制码。
通过系统菜单栏“类/新建属性…”启动“新建属性”对话框,按上表设置属性,其中可视性设为:公共。最后设置GotFocus与LostFocus事件过程:
Gotfocus Event事件过程:
If this是否中文
=imestatus(1)
else
=imestatus(0)
endif
Lostfocus Event事件过程:
=imestatus(0)
到此,类已经定义完成,以后只要在设计表单时,通过表单控件“工具栏/查看类/添加…”把自定义类加入,并且设置“是否中文”属性即可实现中英文输入的自动切换。
本栏文章均来自于互联网,版权归原作者和各发布网站所有,本站收集这些文章仅供学习参考之用。任何人都不能将这些文章用于商业或者其他目的。( Pfan.cn )
【编程爱好者论坛】