delphi怎样读取word中指定行的内容?或者读取指定第n个回车键至第n+1个回车键之间的内容?
delphi怎样读取word中指定行的内容?或者读取指定第n个回车键至第n+1个回车键之间的内容?向word写入的我已经懂了,就是WordDocument1.Range.InsertAfter,但怎样读取到edit1呢?
[解决办法]
//这段代码,看看对你有帮助吗?至于在word中建书签,就不说了。
//uses Word2000, Excel2000, Office2000
procedure Test(Tag: OleVariant; Str: string);
var
Temp: Range;
Flag: OleVariant;
begin
if WordDocument.Bookmarks.Exists(Tag) then
begin
Temp:= FWordDocument.Bookmarks.Item(Tag).Range;
Temp.Text := Str;
end;
end;