请那位朋友帮忙,帮我写一段程序,内容是:1,用程序写新建一个word文档并保存为文件名为dd.doc,
2,在dd.doc里第一行,第十列写“我爱你”,在第一行,第五十列写“一万年”,在第三行,第十列
写“谢谢”,在第三行,第五十列写“永远的爱”

解决方案 »

  1.   

    /-\/-\
    \    /
     \  /
      \/
    ????????????????????????????????????????????????
    用Memo、TWordApplication就可以啦,自己写代码
    因为,代码是非常长的~~
      

  2.   

    用书签可以做到!
    http://expert.csdn.net/Expert/topic/1806/1806110.xml?temp=.2416803
      

  3.   

    做个word文档,在你要改值的地方用特殊文字标上(如##aaa#,##bbb#),建一个StringListA装好所有特殊标识,另一个StringListB载入替换文字,设置好所有参数,以下是其中部分……
      matchcase := false;
      matchwholeword := True;
      matchwildcards := false;
      matchsoundslike := false;
      matchallwordforms := False;
      to_forward := true;
      wrap := wdFindContinue;
      replace_format := false;
      replace := True;
      for I:=0 to StringListA.Count-1 do
      begin
        findtext := StringListA.Strings[I];
        replacewith := StringListB[.Strings[I];
        replacewith:='^c';
        WordDocument1.range.find.execute( findtext, matchcase, matchwholeword,
            matchwildcards, matchsoundslike, matchallwordforms, to_forward,
            wrap, replace_format,replacewith, replace );    WordDocument1.range.find.execute( findtext, matchcase, matchwholeword,
            matchwildcards, matchsoundslike, matchallwordforms, to_forward,
            wrap, replace_format, replacewith, replace );  end;
    ……