首页 > > 程序设计 > VB >

在Word中嵌入应用程序

2018-06-17 17:15:09来源：未知阅读 ()

MicrosoftWord以其强大的文字处理能力、灵活多变的排版方法、所见即所得以及友好的用户界面等特点,博得了广大用户的肯定。但是,若能将其他一些功能,如机器翻译、中文校对、全文检索、实时语音合成等嵌入其中,则可以扩展Word的功能,使开发者能够更加充分地利用Word资源,加快开发速度。
　　开发Word应用程序常用的有以下几种编程语言:WordBasic、VBA(VisualBasicforApplications)和WordAPI。　尽管WordBasic和VBA功能强大,但作为简单修改Word的工具,多少有些大材小用。笔者认为,WordAPI是开发Word应用程序的首选工具,尤其是可以利用C语言代码的快速、高效和灵活的特点,而且可以使用WordBasic接口函数和Windows动态连接库编程环境,实现对Word功能的添加。
　　WordAPI的使用方法
　　WordAPI生成的是一个可在Word中直接运行的Word加载项,它是一个以WLL为扩展文件名的单机动态连接库。这种WLL是标准的Windows动态连接库的特殊形式。可以用任何一个创建WindowsDLL的环境来编译、链接和建立WLL。
　　MicrosoftWordDeveloper'sKit(MSWord开发工具箱)中,提供了WordAPI的接口函数,下面分别加以介绍。
　　1.Word加载项的启动和卸载函数
　　(1)voidFARPASCALwdAutoOpen(shortDocID)
　　在Word中加载WLL的同时,Word会自动执行这个函数。在执行过程中,函数wdAutoOpen完成以下几个任务:
　　·向Word登记WLL中定义的所有函数;
　　·将WLL中的操作命令添加到Word的主菜单、快捷菜单和工具条中;
　　·给WLL的操作命令指定快捷键;
　　·完成WLL功能的初始化(如:机器翻译、中文校对的词库读入等)。
　　(2)voidFARPASCALwdAutoRemove(void)
　　当WLL被卸载时,如果WLL程序中定义了wdAutoRemove(void)函数,Word将在卸载时执行这个函数。在该函数中,可以保存退出时我们定义功能函数生成的必要数据。
　　2.Word加载项中的登记函数
　　要想让Word中的某个主菜单项、快捷菜单项、工具条按钮或快捷键完成我们定义的某个函数,就必须在加载WLL时,先向Word登记我们的应用函数。WordAPI的接口函数CAPIRigister可以完成登记任务。该函数定义形式如下:
　　shortCAPIRegister(shortDocID,LPUCHARlpszFunctionName,LPUCHARlpszDescription);
@@0541700.JPG;表1@@
　　3.在Word中将加载函数添加到主菜单项、快捷菜单项、工具条按钮和快捷键中　　在WLL中应用函数登记完成之后,就可以在主菜单、快捷菜单和工具条中添加自己的菜单项和快捷键。这些工作由下面的函数完AddButton、NewToolbar、ToolsCustomi
zeMenu、ToolsCustomizeMenuBar和ToolsCustomizeKeyboard。
　　·在Word工具条中添加一个按钮:
　　shortCAPIAddButton(shortDocID,LPSTRlpszToolbar,shortcPosition,LP
STRlpszMacro,LPSTRlpszFace);
　　　*S在Word中添加新的工具条:
　　shortCAPIAddToolbar(shortDocID,LPSTRlpszToolbar);
　　·在主菜单中添加新的菜单项:
　　shortCAPIAddMenu(shortDocID,LPSTRlpszMenuName,shortPosition,shortMe
nuType);
　　·在菜单项中添加新的菜单命令:
　　shortCAPIAddMenuItem(shortDocID,LPSTRlpszMenu,LPSTRlpszName,LPSTR
lpszMenuText,shortPosition,shortMenuType);
　　·定义一个新的快捷键:
　　shortCAPIAddkey(shortDocID,shortkeyCode,LPSTRlpszName)。
　　要想定义组合键的快捷键方式,就需把几个键在WordBasic中的代码数字的二进制进行按位‘或'运算,将结果传递给第二个参数KeyCode。例如:快捷键CTRL S的KeyCode是(256OR83)=339。
　　4.WordAPI调用WordBasic函数前,函数参数和返回值的数据缓冲区的建立Word中的所有字处理功能都可由对应的WordBasic函数来实现。正是利用这一点,在
WLL中可以通过调用WordBasic函数来实现对Word的定制。因此,必须利用WordAPI函数InitWCB设立调用WordBasic函数时传递参数与返回值的数据缓冲区。
　　VoidInitWCB(WCBfar*lpwcb,shortretType,LPSTRlpBuffer,shortcBufferSize);
　　InitWCB的参数说明如下:
@@0541701.JPG;表2@@
　　例如,下面这段程序是获取所选区域的字符串字体情况:
　　WCBwcb;//Word的参数和返回值传递的数据区
　　short　isbold;
　　InitWCB(&wcb,TypeShort,NULL,0);
　　//设立传递WordBasic函数参数和返回值的数据区wcb
　　WORDFUNCTION(wdBold);
　　//调用WordBasic函数Bold()
　　isbold=wcb.wdoprReturn.Short;
　　//从数据区wcb中取出WordBasic函数Bold()的返回值
　　5.WordBasic函数调用方法
　　Word中的命令是与WordBasic函数一一对应的。因此,WordAPI可以通过接口函数用C语言直接调用WordBasic函数来实现Word命令。
　　注意:在WordAPI中调用WordBasic命令函数名时均须在WordBasic函数名前加上2个英文字母‘wd',如:WordBasic函数Bold在WordAPI中的函数名应为wdBold。
　　根据这些函数有无返回值与是否为响应对话框的情况,在WordAPI头文件basedef.h定义了三种调用方法:WORDCALL、WORDFUCTION和WORDDIALOG。
　　·若被调用的WordBasic函数无返回值,用WordAPI接口函数WORDCALL来调用,形式是:WORDCALL(函数名);
　　·若被调用的WordBasic函数有返回值,用WordAPI接口函数WORDFUNCTION来调用,形式是:WORDFUNCTION(函数名);
　　·若被调用的WordBasic函数是有关对话框操作,用WordAPI函数WORDDIALOG来调用,形式是:WORDDIALOG(函数名)。
　　例如:WordBasic中,给所选区域字符标粗体的函数Bold与判断所选区域字符是否为粗体的函数Bold()的调用方法就不同:
　　·函数Bold是一个操作,无须返回值,所以调用形式是WORDCALL(wdBld)。
　　·函数Bold()是一个判断,必须有返回值,所以调用形式是WORDFUNCTION(wdBold);
　　6.WordBasic函数参数的传递方法
　　在调用WordBasic带参函数时,需要通过WordAPI特定接口函数来传递参数。同时,对不同类型的函数,参数的传递方法也不同。
　　(1)逐个传递参数
　　这种传递参数的方法适用于参数位置固定的函数,例如:WordBasic函数:
　　MenuText$(Type,MenuNumber[,Context])
　　其中的三个参数是按次序排列的。由于WordAPI调用WordBasic函数方式是函数名作为WORDCALL、WORDFUCTION和WORDDIALOG的参数,无法一次添加WordBasic函数参数,所以传递WordBasic函数参数时需要在InitWCB函数设置数据缓冲区后,依次通过数据缓冲区传递参数,第一个赋给Type,第二个赋给MenuNumber,如果有第三个参数则赋给Context。
　　在向这类函数传递参数时,根据待传递参数数据类型的不同,有以下4个函数可以选用
　　·传递short型参数的函数:
　　voidAddShortParam(WCBfar*lpwcb,shortShortVal);
　　·传递long型参数的函数:
　　voidAddLongParam(WCBfar*lpwcb,longLongVal);
　　*S传递double型参数的函数:
　　voidAddDoubleParam(WCBfar*lpwcb,doubleDoubleVal);
　　·传递字符串参数的函数:
　　voidAddStringParam(WCBfar*lpwcb,LPSTRlpStr);
　　下表是上面4个函数参数的说明:
@@0541702.JPG;表3@@
　　例如,下面部分程序的作用是给所选区域字符串着绿色:
　　InitWCB(&wcb,TypeShort,NULL,0);
　　AddShortParam(&wcb,4);
　　//4是绿色在Word中的标识,将一个short参数放//入参数缓冲区
　　WORDCALL(wdCharColor);
　　//调用WordBasic函数CharColor
　　(2)传递指定参数
　　这种传递参数的方法适用于参数有标识名指明的函数。这种函数的参数有定义了的标识,传递时没有次序问题。例如:WordBasic中插入空表的函数TableInsertTable:Ta
bleInserTable[.ConvertForm][,.NumberColumns][,.NumRows][,.InitialColWidth][
,.Wizard][,.Format][,.Apply]　因此,向TableInserTable函数传递参数时,只需指明哪一个标识即可。这种情况一般用于具有较多参数的函数。
　　在向这类函数传递参数时,与上面的类似,也是根据参数数据类型的不同,有以下4个函数可以选用:
　　·voidAddShortDlgField(WCBfar*lpwcb,shortShortVal,shortFieldId,shor
tfMode);
　　·voidAddLongDlgField(WCBfar*lpwcb,longLongVal,shortFieldId,shortf
Mode);
　　·voidAddDoubleDlgField(WCBfar*lpwcb,doubleDoubleVal,shortFieldId,s
hortfMode);
　　·voidAddStringDlgField(WCBfar*lpwcb,LPSTRlpStr,shortFieldId,shortf
Mode,shortcBufferSize);
　　下表是上面4个函数参数的说明:
@@0541703.JPG;表4@@
　　其中,传给FieldId的所有标识名都已在WORDAPI文件wdfid.h中被定义了。
　　下面的例子是要在光标所在位置插入一个4*12的空表:
　　InitWCB(&wcb,TypeShort,NULL,0);
　　AddStringDlgField(&wcb,"4",fidNumColumns,fMode,0);
　　AddStringDlgField(&wcb,"12",fidNumRows,fMode,0);
　　WORDCALL(wdTableInsertTable);
　　上面的fidNumColumns和fidNumRows是在WordAPI文件wdfid.h中定义的参数标识名。调用函数AddStringDlgField,将表的行数"4"和列数"12"直接传给WordBasic的函数TableInsertTable的两个参数NumColumns和NumRows。
　　注意:在WordAPI文件wdfid.h中被定义了的函数参数的标识名是与WordBasic函数的参数标识名一一对应的,但不同的是,WordAPI的参数标识名是在WordBasic的参数标识名前加了‘fid'构成的。如:WordBasic的函数TableInsertTable有两个参数是NumColumns和NumRows,那么,在WordAPI中的参数标识名就应是fidNumColumns和fidNumRows。
　　创建WLL的程序框架
　　本文给出一个用WordAPI完成的完整WLL框架,来实现如下图所示Word中的修改。@@0541704.JPG;图1加载WLL模板后的Word界面图@@
　　编者注:源程序发表在本报WWW站点上,地址:http://www.computerworld.com.cn/
98/skill/default.htm。欢迎访问!
　　在Word中加载或卸载WLL
　　经过编译、链接生成DLL文件(动态连接库文件)后,必须将文件的扩展文件名.dll改为.wll,以便在加载WLL时能被Word正确识别为Word加载项。
　　将自己编写的WLL加载到Word中有以下几种方法:
　　·模板方式加载:在Word中主菜单‘文件'中找到‘模板',进去后按下‘添加'按钮,选中自己编写的WLL模板文件(文件扩展名为wll)后‘确定',加载WLL即可完成,如下图所示。
　　·打开文件方式加载:像打开一般的Word文档一样,打开WLL模板文件,即可完成加载
。
　　·Word自动完成加载:将WLL模板文件复制..\windord\startup\目录下,像Word中的常用模板一样,在启动Word时,Word会自动将WLL模板文件加载到Word中。
　　卸载WLL的方法只有一种:在Word中主菜单‘文件'中找到‘模板',将‘共用模板及加载项'框中‘translate.wll'前的复选钮钩掉后‘确定',卸载WLL的工作即可完成。->

标签：

版权申明：本站文章部分自网络，如有侵权，请联系：west999com@outlook.com
特别注意：本站所有转载文章言论不代表本站观点，本站所提供的摄影照片，插画，设计作品，如需使用，请与原作者联系，版权归原作者所有