VFP智能感应的二次开发
添加时间: 2007-7-9 2:56:11 作者: VFP教程 阅读次数:81 来源: http://www.d9soft.com
关键字:VFP 编辑器 智能感应
1 智能感应简介
VFP从7.0版开始增加了一个非常好的功能:智能感应(IntelliSense)功能。主要的功能有:(1)输入命令缩写及空格后,命令会自动扩展;(2)输入函数名及左括弧、对象名及点之后,系统会自动提示相应的参数或属性、方法名等供选择。除了上述这些与其它语言类似的功能以外,VFP还有一个特点,那就是它提供了可供用户二次开发的功能,即可以用脚本程序对功能进行扩展。
智能感应的所有
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 智能感应的简单应用:提示信息的汉化
命令、函数、属性等类型的记录都是
3.用户自定义类型的使用
用户自定义类型(Type为U)的记录,是我们可以添加的。下面介绍一下脚本编写的方法。
脚本实际上就是
4. FOXCODE对象的属性
FOXCODE对象有许多属性,没有方法。与FOXCODE表的字段同名的属性,分别代表相应的字段内容,除此以外比较有用的还有:
CursorLocaChar:
DefaultCase:缺省大小写,来自Type为V的记录的Case字段内容
FileName:编辑的文件名
FullName:当前输入的整行文本
Location:使用编辑器的类型:
0:命令窗口,1:程序,8:菜单片段,10:
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版中调试成功。
上一篇文章: Visual FoxPro 9.0更强大了 下一篇文章: VFP中状态栏控件的使用说明
相关软件:

