想启动Word,并取Word文档中的表格和书签,然后添加值。为何总出错。
elby 2005-06-18 06:23:20 我想启动Word,并取Word文档中的表格和书签,然后添加值。下面是在网上获取的一个程序,其中有以下的定义。
为什么运行时,总说vSelection: Selection;这个定义有问题。
Error] StartWord.pas(46): Undeclared identifier: 'Selection'
[Error] StartWord.pas(109): Missing operator or semicolon
[Error] StartWord.pas(115): Missing operator or semicolon
[Fatal Error] WORD.dpr(5): Could not compile used unit 'StartWord.pas'
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, OleServer, Word2000, WordXP;
.......
procedure TForm1.Button1Click(Sender: TObject);
var
templateName: OleVariant;
newTemplate: OleVariant;
ItemIndex: OleVariant;
vSelection: Selection;
vBookMark: BookMark;
vTable: Table;
I : Integer;
begin
........
ordApp.Documents.AddOld(templateName, newTemplate);
wordApp.Caption := ListBox1.Items.Strings[ListBox1.ItemIndex];
vSelection := wordApp.Selection;