用程序将图片插入到Word中，怎样设置图片的水平居中？(120分)

BookMark_Name := 'tp'; //插入图片的位置
if WordDocument1.BookMarks.Exists(BookMark_Name) then
begin
WordDocument1.BookMarks.Item(BookMark_Name).Select;

FPicture := WordApplication1.Selection.InlineShapes.AddPicture('c:/1.bmp', EmptyParam, EmptyParam, EmptyParam);
FPicture.ConvertToShape.Select; //转成可移动模式...
WordApplication1.Selection.ShapeRange.WrapFormat.type_ := wdWrapTopBottom; //嵌入型

WordApplication1.Selection.ShapeRange.Left := wdShapeCenter;
end;

========================
以上是我的代码，我本以为：
WordApplication1.Selection.ShapeRange.Left := wdShapeCenter;
能够实现图片的水平居中，但是不行？

WordApplication1.Selection.ParagraphFormat.Alignment := wdAlignParagraphCenter

www.wzlab.com/bbs上有这个例子，你上去看行不行

To：
yuzk2005，谢谢你！

在这之前我试过了：
WordApplication1.Selection.ParagraphFormat.Alignment := wdAlignParagraphCenter

不行，我索性到Word2000.pas里找与Center相关的东西，都试过了，都不行。

to：
民工助理

我上了www.wzlab.com/bbs没有搜索到！

richviewedit控件可以导入和保存WORD 。可以实现图片的水平居中。
在www.richview.com 下

procedure TForm1.Button1Click(Sender: TObject);
var BookMark_Name: olevariant;
begin
WordApplication1.Connect;
WordDocument1.ConnectTo(WordApplication1.ActiveDocument);
BookMark_Name := 'tp'; //插入图片的位置
if WordDocument1.BookMarks.Exists(BookMark_Name) then
begin
WordDocument1.BookMarks.Item(BookMark_Name).Select;
WordApplication1.Selection.InlineShapes.AddPicture('E:/1.bmp',EmptyParam, EmptyParam, EmptyParam);
WordApplication1.Selection.ParagraphFormat.Alignment := wdAlignParagraphCenter ;
end;
end;
//测试通过

非常感谢yuzk2005的支持。通过，原来去掉那两句就OK了。

多人接受答案了。