万年书妖教的， 用AHK向PPT插入图片

#z::
图片路径:="x:\pic\catelina.jpg"
op:=ComObjActive("powerpoint.application")
op.ActiveWindow.Selection.SlideRange.Shapes.AddPicture(图片路径, 1,1,20,20,100,100)
return