with query_cbtyt do
        begin
          close;
          sql.Clear;
          sql.Add('select * from Ó¡Ë¢¼Æ»®±íÍ· where ±àºÅ= '+fieldname+'''');//
          open;
        end;
        str:=query_cbtyt.FieldByName('ÉçÄÚÑ¡Ìâ±àÂë').AsString;
        vDoc.Books.Item('xth').Range.InsertAfter(str);///////////注意就是这语句
把我的表格对齐破坏了,后面的标题位置发生了移动,我想再指定的位置进行重写 overwrite 不是insert 高手告诉我怎么办呀

解决方案 »

  1.   

    去word里录一段宏看看。
    似乎是改overtype的值
      

  2.   

    可以再D中改属性么,我不想动宏,有没有overwrite之类的函数
    再word中不是又insert 和 overwrite状态么
      

  3.   

    我是说按照宏的写法来写。
    好久没整过OLE方式了,好象可以这样改的:
    wordApplication1.Options.Overtype := not wordApplication1.Options.Overtype ;
      

  4.   

    郁闷,为什么不能处于overwrite状态,儿一开始就是inserted ,word中不可以调整么
      

  5.   

    如果以后有方法将 word 的insert 改成overwrite,请给我一份copy