VB.net 2010 视频教程 VB.net 2010 视频教程 python基础视频教程
SQL Server 2008 视频教程 c#入门经典教程 Visual Basic从门到精通视频教程
当前位置:
首页 > 数据库 > VF教程 >
  • vfp教程之VFP智能感应的二次开发

摘要:本文提出了VFP内置编辑器的智能感应功能及用法,供智能感应使用的表FOXCODE.DBF的结构及功能。重点介绍了智能感应的二次开发功能的脚本程序编写方法。文中给出了几个实用的实例。
关键字:VFP 编辑器 智能感应

1 智能感应简介
VFP从7.0版开始增加了一个非常好的功能:智能感应(IntelliSense)功能。主要的功能有:(1)输入命令缩写及空格后,命令会自动扩展;(2)输入函数名及左括弧、对象名及点之后,系统会自动提示相应的参数或属性、方法名等供选择。除了上述这些与其它语言类似的功能以外,VFP还有一个特点,那就是它提供了可供用户二次开发的功能,即可以用脚本程序对功能进行扩展。
智能感应的所有内容及方案都在一个表中定义,表的文件名在系统变量_FOXCODE中存放。修改或扩展这个表的内容就可以改变智能感应的内容。在工具菜单中有一项是智能感应管理器(IntelliSense Manager)。智能感应管理器的作用其实就是帮助修改这个表。当然也可以直接用手工对表进行修改。
2 FOXCODE的表结构及用法
2.1 FOXCODE的表结构
此表共有十几个字段,下面介绍一下几个关键字段的用处:
Type:类型,有C(命令)、F(函数)、P(属性)、S(脚本)、O(对象)、U(用户自定义)等
Abbrev:引发智能感应的关键词,也是命令或函数的最短缩写
Cmd:填写脚本的名称,放在{}内,此脚本名应在另外一条记录的Abbrev字段中
Data:备注型,存放脚本程序,或存放任意数据
Expanded:命令或函数展开的全名
Tip:提示信息
根据Type的不同,这些字段的意义也有所区别,而且不一定全部需要,不需要的字段可以空着,下面简单介绍一下不同用途的组合方式:
C或F:Abbrev中存放缩写,Expand中存放全称,Cmd中的脚本名可选
S:Abbrev中存放脚本名,Data中存放脚本程序
U:Abbrev中存放关键词,Cmd存放空括弧{},脚本直接存放在Data中;或者:Cmd中存放脚本名,Data中存放数据,脚本则在另外一条记录中定义。
2.2 智能感应的简单应用:提示信息的汉化
命令、函数、属性等类型的记录都是系统内部已经定义好的,虽然也可以修改,但基本上不好作太大的变动,毕竟功能的改造是有限的,在此就不详加叙述了。然而有一点工作是可以做的,那就是对Tip字段进行汉化。由于VFP从7.0开始已经不再出中文版了,汉化工作必须由自己做,对于智能感应提示的汉化,不需对二进制文件进行修改,直接修改表的Tip字段即可,这样汉化难度就很简单了。汉化时要注意,由于里面的逗号是作为参数分隔符的,不要进行增删,否则参数会错位。内容中若需要添加逗号,请使用全角的中文逗号。这样经过汉化之后,提示就变成中文的了。由于系统变量_FOXCODE的值可以改变,因此可以随时改变它的值,选择另外的表。若结合键激活功能,可以设置一个热键用于切换_FOXCODE的值,以便随时改变中、英文提示。
3.用户自定义类型的使用
用户自定义类型(Type为U)的记录,是我们可以添加的。下面介绍一下脚本编写的方法。
脚本实际上就是标准的VFP程序,简单地说,就是在编辑时输入一个在Abbrev字段中存在的字符串,并按空格键激活智能感应,那么系统就执行相应的脚本程序,用脚本的返回值替换输入的内容,若返回值为空,则不替换。调用脚本时,系统会传入一个对象型的参数FOXCODE,这个参数包含了用户输入的及FOXCODE表中相应记录中的许多有用的信息,脚本程序可以从中获取信息。因此不管是否需要这个对象,脚本程序的第一句必须用LPARAMETERS接收传入的参数。
4. FOXCODE对象的属性
FOXCODE对象有许多属性,没有方法。与FOXCODE表的字段同名的属性,分别代表相应的字段内容,除此以外比较有用的还有:
CursorLocaChar:执行脚本后,放在要选中文本内容前后的特殊字符,默认为“~”
DefaultCase:缺省大小写,来自Type为V的记录的Case字段内容
FileName:编辑的文件名
FullName:当前输入的整行文本
Location:使用编辑器的类型:
0:命令窗口,1:程序,8:菜单片段,10:代码片段,12:存储过程
UserTyped:用户输入的文本,不包括激活键、前导空格或Tab(可用FullLine代替)
valueTip:当valueType为“T”时的提示
valueType:脚本处理的方案,L:显示列表项,V:显示值,T:提示。这个属性一般需要在脚本中赋值,用户自定义的一般设置为“V”
5.实例分析
为了能说得更清楚,现举几个实例,并对其进行分析说明。下面的例子中的Type都为“U”,Abbrev为要替换的关键字。“U”类型相当与“C”类型(命令),是用空格键激活的。若是类的方法或函数,是用左括弧激活的,那么必须用“F”类型,其余的与“U”类型的类似。
5.1直接替换,不用脚本
在Expanded中存放展开后的字符串即可,字段长度为26,不超过就行。而且前面的几个字符不必与Abbrev的相同。
5.2 用单条记录实现
脚本程序直接存放在当前记录的Data字段中,在Cmd字段中存放空括弧{}。例:关键词为DC,替换为DEFINE CLASS语句块的多行内容,最后光标停在“类名”的位置。脚本程序为:
LPARAMETERS oFoxcode
IF oFoxcode.Location #1 &&如果不是程序窗口,则不变
RETURN ""
ENDIF
oFoxcode.valuetype = "V" &&此行必需
TEXT TO myvar NOSHOW 
DEFINE CLASS ~类名~ AS Session OLEPUBLIC
PROCEDURE Init

ENDPROC
ENDDEFINE
ENDTEXT
RETURN myvar
说明:(1)若使用智能感应管理器,则点击Custom中的Script时,LPARAMETERS一行会自动添加。(2)TEXT-ENDTEXT间的几行(包括空行)为返回的内容,替换后“类名”为选中状态,便于直接输入。若只需光标定位,不需选中,则只要一个“~”就行了,符号“~”由CursorLocaChar属性决定,是可变的。
5.3 单独定义脚本
若脚本程序有通用性,则可以把脚本写到单独的记录中,供其它项调用。定义脚本:Type为“S”,Abbrev存放脚本名,Data存放脚本程序,Cmd为空。调用:Type为“U”,Abbrev存放关键词,Data存放数据,Cmd存放要调用的脚本名(两边加{})。例:关键词为SQ与IQ,分别生成SQL的SELECT与INSERT语句,字段名由脚本生成,若当前已有表打开,则使用当前表,否则提示打开。
Type Abbrev Cmd Data
U SQ {fieldlist} SELECT <> FROM <> 
WHERE ~条件~ INTO CURSOR
U IQ {fieldlist} INSERT INTO <> (<>) 
value (~<>~)
S fieldlist 脚本程序

fieldlist脚本程序如下
LPARAMETER oFoxCode
oFoxcode.valuetype = "V"
IF EMPTY(DBF()) &&没打开表,则提示打开
USE ?
ENDIF
AFIELDS(AR)
FieldList=AR(1,1)
FOR I=2 TO ALEN(AR,1)
FieldList=FieldList+","+AR(I,1)
NEXT
DbfName=JUSTSTEM(DBF())
RETURN TEXTMERGE(oFoxCode.Data) &&直接替换DATA中两个变量的内容
脚本程序说明: TEXTMERGE()函数可以用变量的值一次性替换字符表达式里<<>>中的变量。
6 其它
系统在第一次运行时会把FOXCODE.DBF从安装目录下复制一份到WINDOWS下的应用数据目录下,再使用它。HOME()目录下会有相同的一份,到底用的是哪一份,以系统变量_FOXCODE为准,也可以重新设置。
可以通过设置_VFP.EditorOptions属性来打开或关闭智能感应功能,赋"lq"可分别关闭成员列表与快速提示。小写为关闭,大写为打开。
7.总结
智能感应虽然是7.0版才开始有的,比其它的编程软件晚,但一开始就有强大的功能,更有意义的是它的功能是表FOXCODE.DBF的内容来实现的,因此用户可以通过修改或增加表的记录来增加系统智能感应的功能,达到了二次开发的目的,这一点是任何其它语言所不能达到的。
VFP的这种特性给编程带来了方便,若充分利用其功能,可以做到事半功倍的效果。文中提到的程序与脚本,都已在VFP7.0版中调试成功。
相关教程