Создание диаграммы в Word

[Malgor]

    ...
    Var Doc,Diag,Chart:oleVariant;
    ...
    Doc:=w.activeDocument;
    ...
   Doc.Shapes.AddOLEObject('MSGraph.Chart.8');
    Doc.Shapes.Item(Doc.Shapes.Count).line.Visible:=0;
    Doc.Shapes.Item(Doc.Shapes.Count).left:=100;
    Diag:=Doc.Shapes.Item(Doc.Shapes.Count);
    Chart:= Diag.OLEFormat.Object;
    Chart.ChartType := 54;
    Chart.Application.DataSheet.Activate;
    Chart.ChartArea.Font.Bold := False;
    Chart.Application.DataSheet.Cells.Clear;
    Chart.Application.DataSheet.Cells[3, 1].Value :='';
   ...

Вобщем, вот в таком виде заработало, но 1 проблема возникла, диаграмма вставляется не в текст а поверх него, если вместо Shapes использовать InlineShapes диаграмма создасться в нужном месте, но с её редактированием возникают проблемы:

Chart:= Diag.OLEFormat.Object;

вместо object приходится прописывать object_ , и не получается редактировать созданую диаграмму(во всяком случае вышеописаным методом);
Если после создания и редактирования диаграммы конвертировать её в InlineShapes диаграмма вставляется в начало документа вместо текущего положения курсора(что собственно и требуется).

Собственно вопрос в том как переписать вышеописанный код под inlineshapes, либо как создать диаграмму с помощью shapes
чтобы она была в самом тексте а не поверх него.
Ну как вариант ещё может кто знает как можно в документе вырезать обьект, а затем вставить его из буфера обмена.