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属性，既可以做到在中西文录入过程中不必进行录入法的来回切换，还可以做到让用户选择自己最喜欢的汉字输入法，而且这样的录入界面对于用户来说也是非常友好、方便、快捷的。PCC
必须用'标识符，但直接用'会出错
tdataset.filter:='somebodyname='+chr(39)+'李*'+chr(39)
关键词：Delphi下汉字输入法的编程及运用