如何将图片插入word文件中？请给详细代码。谢谢！已经问了几次了呀，没人正面回答。

Question

如何将图片插入word文件中？请给详细代码。谢谢！已经问了几次了呀，没人正面回答。

Answer 1

wordapplication1.ActiveDocument.Shapes.AddPicture(picname,f, t,left,top,w,h,EmptyParam);

Answer 2

var
  WinWord,WordHandle:variant;
begin
  WinWord:=CreateOleObject('Word.Application');
  WinWord.visible:=True;
  WordHandle:=WinWord.Documents.Add(Template:='',NewTemplate:=False);
  WinWord.Selection.InlineShapes.AddPicture(FileName:='f:\Adobe1.jpg',
      LinkToFile:=False,SaveWithDocument:=True);  winword.Selection.ParagraphFormat.Alignment:=wdAlignParagraphCenter;
end;