以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  在设置目录树节点等的图片时如何控制图片大小  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=84615)
--  作者：凡夫俗子
--  发布时间：2016/5/5 17:01:00
--  在设置目录树节点等的图片时如何控制图片大小

Dim pbx AS WinForm.PictureBox
pbx = Forms("窗口1").Controls("PictureBox1")
pbx.Image = GetImage("C:\\Sample.bmp")


比如 这个要将图片限定为 32*32像素
--  作者：大红袍
--  发布时间：2016/5/5 17:33:00
--  


Dim bmp  = new bitmap(pbx.Image, 32, 32)
bmp.save("d:\\缩略图.jpg")
bmp.Dispose