关于在word中插入图片的问题

我在word表格中插入图片，图片总不能在我指定位置插入，（准确的说就是在光标出插入）。请各位帮我看看程序。
begin
    try
        Wordapplication1.Connect;
    except
        MessageDlg('Word2000可能没有安装！', mtError, [mbOk], 0);
        exit;
    end;    Wordapplication1.Visible := true;
    WordApplication1.Caption := name;    FileName := 'C:\1.doc';
    ConfirmConversions:= False;
    ReadOnly:=False;
    AddToRecentFiles:=False;
    PasswordDocument:='';
    PasswordTemplate:='';
    Revert:=True;
    WritePasswordDocument:='';
    WritePasswordTemplate:='' ;
    Format:=wdOpenFormatDocument;
    Visible := true;
    Encoding := '';
    WordApplication1.Documents.Open( FileName, ConfirmConversions,
    ReadOnly, AddToRecentFiles, PasswordDocument, PasswordTemplate,
    Revert, WritePasswordDocument, WritePasswordTemplate, Format, Encoding, Visible);
    ItemIndex:= 1;
    WordDocument1.ConnectTo(WordApplication1.Documents.Item(ItemIndex));
    WordApplication1.Options.CheckSpellingAsYouType := False;
    WordApplication1.Options.CheckGrammarAsYouType := False;
  unit_:=wdCharacter;
    count:=24;
    extend:=false;
    linktofile:=false;
    savewithdocument:=true;
    range:=worddocument1.Range;
    wordapplication1.Selection.MoveRight(unit_,count,extend);
    worddocument1.InlineShapes.AddPicture      （'c:\1.jpg',linktofile,savewithdocument,range);