CB2010使用OLE向word的表格里面插入图片，位置错位，怎么回事？

[麻酱面条]

是第三个表格，8行7列，其中第8行的后几个单元格使用下面的代码进行合并，合并没有问题。

start_cell = vTable.OleFunction("Cell", 8,2);
end_cell   = vTable.OleFunction("Cell", 8,7);
start_cell.OleProcedure("Merge", end_cell);

在8行第一格，第二格（合并后的） 填写内容，代码如下：

vCell = vTable.OleFunction("Cell", 8, 1);  	
vCell.OlePropertySet("Range", "绕组变形情况与检修建议"); 
vCell = vTable.OleFunction("Cell", 8, 2);  	
vCell.OlePropertySet("Range", "内容内容");

这个也没有问题。

现在，想把第8行第2格插入图片，总是不成功，代码如下：

AnsiString
strPicFile = "C:\\vi.emf";
vTable=vWordApp.OlePropertyGet("ActiveDocument").OleFunction("Range").OlePropertyGet("Tables").OleFunction("Item", 3);
vTable.OleFunction("Cell",8, 2).OleFunction("Select");
Variant vShape =vWordApp.OlePropertyGet("Selection").OlePropertyGet("InlineShapes").OleFunction("AddPicture", strPicFile.c_str(),false,true);

目前的现象是图片插入到了第8行第1格的位置，但是第8行第2格的“内容内容”这些字已经没有了，感觉是被图片替换掉了。可是图片为什么会跑到第1格呢？

[麻酱面条]

求老妖帮忙，求大大帮忙啊！

[麻酱面条]

求大家百忙之中帮帮忙啊，多谢啦！

[ccrun.com]

那天我看到这个帖子了，但是后来忘了，楼主你搞一个demo发给我，我帮你分析一下。cbfans at 163 dot com

[麻酱面条]

哎呀 ，这么久还没有人回答 ，再顶一下，呼唤大神。

[麻酱面条]

引用 4 楼 ccrun 的回复:

那天我看到这个帖子了，但是后来忘了，楼主你搞一个demo发给我，我帮你分析一下。cbfans at 163 dot com

邮件已发，盼复。

[麻酱面条]

妖哥，我的邮件收到了吗？

[ccrun.com]

啊，我早忘了此事。我去看看。

[麻酱面条]

妖哥，你又把我忘了啊，有答案要发我邮箱啊，多谢啊。 zhangjun4u AT 126 DOT com

[麻酱面条]

我又往你的cbfans at 163 dot com邮箱发了一遍。