xiangjinglai 发表于 2015-3-18 10:00:28

对话框如何加载本地图片

希望有大大能指点下。。。

自贡黄明儒 发表于 2015-3-18 12:00:17

;;(dcl-image "RM" 5 5 "rough.slb")
(defun dcl-image (key x y file)
(start_image key)
(setq        max_x (dimx_tile key)
        max_y (dimy_tile key)
)
(slide_image x
             y
             (- max_x x)
             (- max_y y)
             (strcat (findfile file) "(" key ")")
)
(end_image)
)

illcyt 发表于 2015-3-18 23:49:27

自贡黄明儒 发表于 2015-3-18 12:00 static/image/common/back.gif
;;(dcl-image "RM" 5 5 "rough.slb")
(defun dcl-image (key x y file)
(start_image key)


感谢分享，学习了
页: [1]
查看完整版本: 对话框如何加载本地图片