怎么在delphi中把内容导入到word中

Question

怎么在delphi中把内容导入到word中,谢谢！

Answer 1

给我Email我给你发！记住给分哦：）

Answer 2

大侠能不能也给我一份  [email protected]
谢了

Answer 3

to FSU(洋葱面) :
   我也想要，先谢谢了,[email protected]

Answer 4

procedure TForm1.Button1Click(Sender: TObject);
var oe:variant;
begin
    oe:=CreateOleObject('Word.Application');
    oe.Documents.Add(Template:='',NewTemplate:=False);
    oe.visible:=true;
    oe.Selection.TypeText Text:=edit1.text;    //将DELPHI中EDIT1控件的内容传入
                                               //WORD文档,其它内容道理是一样的
    oe.ChangeFileOpenDirectory(<保存文件路径>);
    oe.ActiveDocument.SaveAs(FileName:=<文件名>);
    showmessage('ok');
end;

Answer 5

补充:在uses段加上comobj才可通过编译.

Answer 6

[email protected]
我也要一份

Answer 7

to FSU(洋葱面) :
   我也想要，先谢谢了,[email protected]

Answer 8

zym_double(南来北往) 留下mail地址呀！

Answer 9

zym_double(南来北往)
 mxk19791116(幸运星) 
两位给你们发了