打开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.编程