283528149 发表于 2019-3-31 21:15:49

如何改变插入JPG的高度？

283528149 发表于 2019-3-31 21:16:29

http://bbs.mjtd.com/forum.php?mod=redirect&goto=findpost&ptid=109396&pid=629174&fromuid=238436

caddog 发表于 2019-4-1 11:53:14

本帖最后由 caddog 于 2019-4-1 12:43 编辑


(setq v-selection (mswp-get-Selection msw))
(setq v-insertPic (mswp-get-InlineShapes v-selection))
(setq inlineShapeObj (mswm-AddPicturev-insertPic $fn-pic1 :vlax-false :vlax-true));_插入图片
(mswp-put-height inlineShapeObj 594.95);_图片高
(mswp-put-Width inlineShapeObj 841.6);_图片宽
;;;以下设置图片的 版式
(setq inlineShapeObj (mswm-ConvertToShape inlineShapeObj))
(setq inlineShapeObj-format (mswp-get-WrapFormat inlineShapeObj))
(mswp-put-type inlineShapeObj-format 0)
页: 1 [2]
查看完整版本: lisp控制word插入图片问题