如题。大虾有没有好的办法或源码?

解决方案 »

  1.   

    下面是VBA代码:
    ActiveDocument.InlineShapes.AddPicture FileName:= "C:\Documents and Settings\All Users\Documents\My Pictures\示例图片\Water lilies.jpg" , LinkToFile:=False, SaveWithDocument:=True
      

  2.   

    谢谢,研究一下。不知道有不有直接的DELPHI代码?
      

  3.   

    Ctrl.Application.Selection.InlineShapes.AddPicture('C:\lzwy.gif', False, True).Select;
      

  4.   

    delphi的源代码又是怎样的??
    关注中