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

Question

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

Answer 1

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;