星星博客 - Powered by Discuz! Board

标题: [转帖]Delphi下汉字输入法的编程及使用 [打印本页]

作者: cn2002 时间: 2003-9-15 04:19 标题: [转帖]Delphi下汉字输入法的编程及使用

【原文由 chaotingyun 所发表】
许多Windows应用程序的中西文录入界面中，中西文的录入需要反复切换汉字输入法
，这样使用起来非常麻烦，下面来介绍一种比较简便的解决方法。本文的程序设计环
境为Delphi Client/Server Suit Ver 3.0（以下简称Delphi 3.0）和中文Windows 9
5。
　　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属性。在设计
录入界面表单时，对其中每一个元件的这两种属性赋值，系统就可以在元件获得焦点
时自动打开或关闭所设定的汉字输入法。但是对于用户来说，这种编程方法一点灵活
性也没有。若系统所设定的输入法不?怯没不兜模敲粗缓迷偻ü齏indows 95的输入法选择器重新选择。其实，通过
在Form下放置一个标签及一个下拉组合框的方法就可以灵活地解决这个问题了。本文
示例的Form中共放置了四个Label、两个Edit、一个ComboBox、一个Memo及一个Butto
n，
下面对这个示例作个说明。
　　(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属性，既可以做到在中西
文录入过程中不必进行录入法的来回切换，还可以做到让用户选择自己最喜欢的汉字
输入法......(转载不全请见谅)

欢迎光临星星博客 (http://bbs.huhoo.net/)