如何利用OLE打开WORD?

解决方案 »

  1.   

    OLE控件?OleContainer1.CreateObjectFromFile('c:\mydoc.doc', False);
      

  2.   

    加入comobj单元;var
      wordapp,doc,rag,tab:variant;
    begin
      wordapp:=createoleobject('word.application');
      wordapp.visible:=true;
    try
      doc:=wordapp.documents.add;
      rag:=doc.paragraphs.last.range;
      tab:=doc.tables.add(rag,6,8,0,0);//6row,8col tabel
    finally
      tab:=unassigned;
      rag:=unassigned;
      doc:=unassigned;
      wordapp:=unassigned;
    end;
    end;
      

  3.   

    uses Comobj;
    try
    eclApp:=CreateOleObject(‘Excel.Application’);
    Except
    Showmessage('You Have not Install MS_Word');
    Exit;
    End;
    eclApp.WorkBooks.Open(YourWordFileName);
      

  4.   

    如果你不是必须用程序往WORD写东西的话。建议用shellexectra函数(名字可能不太对,但前5个字母是对的)。因为用OLE有好多的麻烦。比如初始化等