CBC调用WORD的问题！

[LuoGD]

我用TWordApplication调用WORD生成报表，该如何查找定位一个String的位置呢？

[LuoGD]

帮帮我啊！

[LuoGD]

如何移动光标位置，改变Range???

[netliuming]

TWordApplication.Selection.Find.Execute()

//方法(1): 取整个文本的字符内容
s = WordDoc->Range->text;

//方法(2): 取 1 -- 4 位的字符
myRange=WordDoc->Range;
myRange->Start=0;
myRange->End_ =4;