Delphi下汉字输入法的编程及使用
作者:王俊峰 李怀立
文章来源:不详
上一篇 下一篇
--------------------------------------------------------------------------------
许多Windows应用程序的中西文录入界面中,中西文的录入需要反复切换汉字输入法,这样
使用起来非常麻烦,下面来介绍一种比较简便的解决方法。本文的程序设计环境为Delphi
Client/Server Suit Ver 3.0(以下简称Delphi 3.0)和中文Windows 95。 1.Delphi下的Imename、Imemode属性 在Delphi 3.0中的Tedit、Tmemo、TmaskEdit等编辑元件在应用程序中经常使用,这三种元
件都具有ImeName、ImeMode属性。其中ImeName属性是输入法名称,在对象观察器中对应一个包
括当前系统中所有汉字输入法的下拉组合框;ImeMode属性是输入法模式,在对象观察器中也对
应一个下拉组合框,组合框中包含imClose、imOpen、imChinese、imDontCare、imSAlpha、
imAlpha六项内容。 imClose 表示输入法处于关闭状态; ImOpen 表示输入法处于打开状态; ImChinese 表示处于中文输入法状态; ImDontCare 表示若输入法处于关闭状态则打开最近一次使用过的输入法; ImSAlpha 表示输入处于半角状态; ImAlpha 表示输入处于全角状态。 2.Delphi下汉字输入法的编程 在Delphi 3.0中,中西文录入界面中涉及到的输入元件都具有ImeName、ImeMode属性。在
设计录入界面表单时,对其中每一个元件的这两种属性赋值,系统就可以在元件获得焦点时自
动打开或关闭所设定的汉字输入法。但是对于用户来说,这种编程方法一点灵活性也没有。若
系统所设定的输入法不是用户所喜欢的,那么只好再通过Windows 95的输入法选择器重新选
择。其实,通过在Form下放置一个标签及一个下拉组合框的方法就可以灵活地解决这个问题
了。本文示例的Form中共放置了四个Label、两个Edit、一个ComboBox、一个Memo及一个
Button,下面对这个示例作个说明。 (1)在Delphi中选择File | New Application菜单项生成一个新的应用程序,设定新窗体
Form1的属性为: Caption=输入法编程示例; (2)在Form1中添加标签Label1、Label2、Label3及编辑框Edit1、Edit2、Memo1,设定其属
性为: Label1.Caption=中文输入编辑框 Label1.Font.Size=12 Label2.Caption= 西文输入编辑框 Label2.Font.Size=12 Label3.Caption= 中文多行文本编辑器 Label3.Font.Size=12 Edit1.ImeMode=ImOpen Edit2.ImeMode=ImDontCare(缺省值) Memo1.ImeMode=ImOpen 编程时,一般把输入西文或以西文为主的元件的ImeMode属性设为缺省值;而把输入中文或
以中文为主的元件的ImeMode属性设为ImOpen;ImeName属性值则在程序运行时由用户设定。这
个方法的灵活性就在于此。另外,还需要把Edit1.Text、Edit2.Text、Memo1.Lines的值设为
空。 (3)在Form1中添加一个标签Label4,设定其属性为: Caption = 选择最喜欢的输入法 Font.Size=12 Font.Color=红色 (4)在Form1中添加一个下拉组合框ComboBox1,在对象观察器Object Inpector中选择
Events选项卡,双击OnDropDown,对此事件进行编程,其代码如下: ComboBox1.Items.CommaText:=Screen.Imes.CommaText; 上面这个语句可以将中文Windows 95中安装的汉字输入法添加到下拉组合框中,它巧妙地
运用了TScreen类的Imes特性,而Imes特性本身又是一个Tstring类,其属性Commatext包含了
Windows 95已安装的汉字输入法,可以将其直接赋值给ComboBox1的相应属性。如果直接编辑
ComboBox1的属性Items来添加汉字输入法名称,则会在应用程序发布时,因用户机器汉字输入
法的不确定性造成应用程序的不通用性。 在对象观察器中双击OnExit事件,对此事件进行编程,代码如下: Edit1.ImeName:=ComboBox1.Text; Memo1.ImeName:=ComboBox1.Text; (5)在Form1中添加一个命令按钮Button1,设置其属性为: Caption=退出 Font.Size=12 双击此命令按钮,对Click事件进行编程,代码如下: Close; 至此,整个示例的程序设计过程就完成了,保存此应用程序及表单,再进行编译、运行。 3.汉字输入法的使用 首先在下拉组合框中选择你所喜欢的汉字输入法,将光标移到中文输入编辑框中就会发现
所选的汉字输入法已自动出现在屏幕上;再将光标移到西文输入编辑框中,汉字输入法就会自
动关闭;如果将光标移到中文多行文本编辑框中,则已选中汉字输入法又自动出现了。 从上面的程序中可以得出,在应用程序的录入界面中,设置一个选择输入法的下拉组合
框,并让其控制录入界面中所有可输入项的ImeName属性,既可以做到在中西文录入过程中不必
进行录入法的来回切换,还可以做到让用户选择自己最喜欢的汉字输入法,而且这样的录入界
面对于用户来说也是非常友好、方便、快捷的。
作者:王俊峰 李怀立
文章来源:不详
上一篇 下一篇
--------------------------------------------------------------------------------
许多Windows应用程序的中西文录入界面中,中西文的录入需要反复切换汉字输入法,这样
使用起来非常麻烦,下面来介绍一种比较简便的解决方法。本文的程序设计环境为Delphi
Client/Server Suit Ver 3.0(以下简称Delphi 3.0)和中文Windows 95。 1.Delphi下的Imename、Imemode属性 在Delphi 3.0中的Tedit、Tmemo、TmaskEdit等编辑元件在应用程序中经常使用,这三种元
件都具有ImeName、ImeMode属性。其中ImeName属性是输入法名称,在对象观察器中对应一个包
括当前系统中所有汉字输入法的下拉组合框;ImeMode属性是输入法模式,在对象观察器中也对
应一个下拉组合框,组合框中包含imClose、imOpen、imChinese、imDontCare、imSAlpha、
imAlpha六项内容。 imClose 表示输入法处于关闭状态; ImOpen 表示输入法处于打开状态; ImChinese 表示处于中文输入法状态; ImDontCare 表示若输入法处于关闭状态则打开最近一次使用过的输入法; ImSAlpha 表示输入处于半角状态; ImAlpha 表示输入处于全角状态。 2.Delphi下汉字输入法的编程 在Delphi 3.0中,中西文录入界面中涉及到的输入元件都具有ImeName、ImeMode属性。在
设计录入界面表单时,对其中每一个元件的这两种属性赋值,系统就可以在元件获得焦点时自
动打开或关闭所设定的汉字输入法。但是对于用户来说,这种编程方法一点灵活性也没有。若
系统所设定的输入法不是用户所喜欢的,那么只好再通过Windows 95的输入法选择器重新选
择。其实,通过在Form下放置一个标签及一个下拉组合框的方法就可以灵活地解决这个问题
了。本文示例的Form中共放置了四个Label、两个Edit、一个ComboBox、一个Memo及一个
Button,下面对这个示例作个说明。 (1)在Delphi中选择File | New Application菜单项生成一个新的应用程序,设定新窗体
Form1的属性为: Caption=输入法编程示例; (2)在Form1中添加标签Label1、Label2、Label3及编辑框Edit1、Edit2、Memo1,设定其属
性为: Label1.Caption=中文输入编辑框 Label1.Font.Size=12 Label2.Caption= 西文输入编辑框 Label2.Font.Size=12 Label3.Caption= 中文多行文本编辑器 Label3.Font.Size=12 Edit1.ImeMode=ImOpen Edit2.ImeMode=ImDontCare(缺省值) Memo1.ImeMode=ImOpen 编程时,一般把输入西文或以西文为主的元件的ImeMode属性设为缺省值;而把输入中文或
以中文为主的元件的ImeMode属性设为ImOpen;ImeName属性值则在程序运行时由用户设定。这
个方法的灵活性就在于此。另外,还需要把Edit1.Text、Edit2.Text、Memo1.Lines的值设为
空。 (3)在Form1中添加一个标签Label4,设定其属性为: Caption = 选择最喜欢的输入法 Font.Size=12 Font.Color=红色 (4)在Form1中添加一个下拉组合框ComboBox1,在对象观察器Object Inpector中选择
Events选项卡,双击OnDropDown,对此事件进行编程,其代码如下: ComboBox1.Items.CommaText:=Screen.Imes.CommaText; 上面这个语句可以将中文Windows 95中安装的汉字输入法添加到下拉组合框中,它巧妙地
运用了TScreen类的Imes特性,而Imes特性本身又是一个Tstring类,其属性Commatext包含了
Windows 95已安装的汉字输入法,可以将其直接赋值给ComboBox1的相应属性。如果直接编辑
ComboBox1的属性Items来添加汉字输入法名称,则会在应用程序发布时,因用户机器汉字输入
法的不确定性造成应用程序的不通用性。 在对象观察器中双击OnExit事件,对此事件进行编程,代码如下: Edit1.ImeName:=ComboBox1.Text; Memo1.ImeName:=ComboBox1.Text; (5)在Form1中添加一个命令按钮Button1,设置其属性为: Caption=退出 Font.Size=12 双击此命令按钮,对Click事件进行编程,代码如下: Close; 至此,整个示例的程序设计过程就完成了,保存此应用程序及表单,再进行编译、运行。 3.汉字输入法的使用 首先在下拉组合框中选择你所喜欢的汉字输入法,将光标移到中文输入编辑框中就会发现
所选的汉字输入法已自动出现在屏幕上;再将光标移到西文输入编辑框中,汉字输入法就会自
动关闭;如果将光标移到中文多行文本编辑框中,则已选中汉字输入法又自动出现了。 从上面的程序中可以得出,在应用程序的录入界面中,设置一个选择输入法的下拉组合
框,并让其控制录入界面中所有可输入项的ImeName属性,既可以做到在中西文录入过程中不必
进行录入法的来回切换,还可以做到让用户选择自己最喜欢的汉字输入法,而且这样的录入界
面对于用户来说也是非常友好、方便、快捷的。
解决方案 »
- 远程连接Midas服务提示“拒绝访问”
- 怎样用delphi实现两个矩阵相乘
- 关于API函数ReadProcessMemory的用法问题?
- delphi访问webservice关于array of WideString类型调用的问题,请帮忙解决谢谢
- 怎样编译.exe成别的文件名
- 如何在DBGRID或者STRINGGRID中实现用滚轮进行翻页的功能,就象浏览网页一样?菜问题一个~
- 哎,人气越来越差,把分散掉算了!
- 关于DLL的问题
- delphi 5.0 装后不能运行,急急急!!!!!
- 在delphi中用isapi做动态页面,使用TpageProducer 但对具有框架结构的html文件中包含的子html中<#XXX>一点作用都没有,对框架的html中<#XXX>有作用
- 一个我感到难的问题?急!!急!!急!!急!!
- 请问各位大虾:我的主窗口设为fsMDIForm,其他三个弹出窗口设为fsMDIChild,通过点击主窗口的工具栏上的按钮促发弹出窗口,为什么默认的弹出窗口总是最后一个窗口?如何改为第一个窗口? 谢谢赐教!!
在控件的得到焦点事件中动态设置它的ImName:=选一种你常用的输入法(智能ABC等),ImMode:=选择是中文还是英文。这样就ok了。