|
在WORD等汉字处理软件中提供了特殊符号的输入方法,在编程的时候我们也可以借鉴这种方式来实现特殊符号的输入,增加系统的适用性,现在介绍具体实现过程: 一、生成一个特殊符号数据库 生成这个特殊符号数据库可以借助于WORD系统中的插入特殊符号功能,首先新建一个空白文档,利用WORD插入符号功能将所需要的特殊符号全部插入到这个空白文档中,通过加入回车符将每十五个字符排为一行,如下图:
 将这个文档命名为LS.TXT文件,格式为纯文本保存在硬盘C盘根目录下。利用VFP命令建立一个数据库,该库包括15个字段,字段名分别为FH01~FH15,字段类型为字符型,字段宽度为2,将这个数据库命名为ZFK.DBF,数据库建立完毕后,在VFP命令窗口中打入如下命令: USE ZFK APPE FROM C:\LS.TXT SDF 命令执行后,浏览这个数据库,发现刚才在WORD中编辑的LS.TXT文档中的全部特殊符号内容都追加到了这个数据库中,这样一个特殊符号数据库建立完毕。
二、制作一个特殊符号输入表单 新建一个表单并命名为ZFCR,将并表单属性设置如下: AUTOCENTER=.T. SHOWWINDOWS=1 WINDOWTYPE=1 TITLEBAR=0 在这个表单中添加一个表格控件,表格控件的数据源来自生成的特殊符号库ZFK.DBF,设置这个表格的相应属性,去掉表格头,调整表格之间的上下高度和左右宽度,并将该表格设为只读模式,在表格控件中的COLUMN1.TEXT1到COLUMN15.TEXT1的DBLCLICK事件中加入如下代码:
abc=THIS.VALUE &&ABC存放选中的特殊符号内容。 thisform.release 调整表单的大小同表格相同保存,制作的表单如下图:
三、特殊符号插入的具体应用 如在一个表单中的编辑框中要插入特殊符号,只要调用刚才生成的表单即可,如在一个备注字段的编辑框中要求输入一些特殊符号,只要在该编辑框中的RIGHTCLICK事件中加入如下代码: WZ1=THIS.SELSTART DO FORM ZFCR THIS.VALUE=SUBS(THIS.VALUE,1,WZ1)+ABC+SUBS(THIS.VALUE,WZ1+1) THISFORM.REFRESH 如果需要插入特殊符号时,只要在这个编辑框中点击鼠标右键,将自动调出特殊符号表单,使用鼠标双击需要插入的特殊字符,就可以将这个特殊符号插入到编辑框中当前光标所在位置,这样就可以实现了特殊符号的灵活输入。
|