delphi轻松实现输入法编程

我是研究僧i 提交于 2020-03-17 10:41:55

某厂面试归来,发现自己落伍了!>>>

打开delphi 2010窗口进行编程, 编程时,一般把输入西文或以西文为主的元件的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属性,既可以做到在中西文录入过程中不必进行录入法的来回切换,还可以做到让用户选择自己最喜欢的汉字输入法,而且这样的录入界面对于用户来说也是非常友好、方便、快捷的。PCC 必须用'标识符,但直接用'会出错 tdataset.filter:='somebodyname='+chr(39)+'李*'+chr(39) end.

易学教程内所有资源均来自网络或用户发布的内容,如有违反法律规定的内容欢迎反馈
该文章没有解决你所遇到的问题?点击提问,说说你的问题,让更多的人一起探讨吧!