loadimage使用教程 如何在vb中改变图片大小？

如何在vb中改变图片大小？

创建一个图像框和两个命令按钮。

PrivateSubCommand1_Click()缩小

图1。HeightImage1 .高度*0.9

图1。宽度图像1 .宽度*0.9

末端接头

PrivateSubCommand2_Click()放大

图1。H

如何将图片存入sqlite？

sqlit: tsqlit:档案流

开始

(数据库.数据库)

FS :(，fmOpenRead)

SqliteDB。UpdateBlob(更新PhotoLib集照片？其中ID为1，FS)

结束

读取图像控制显示:

(数据库.数据库)

(Select * From PhotoLib，其中Id1)

:女士([图片])

如果(MS nil)则

开始

Showm: 0

PIC :

图片。LoadFromStr:图片

数据库 图片 图像 Click 图

版权声明：本文内容由互联网用户自发贡献，本站不承担相关法律责任.如有侵权/违法内容,本站将立刻删除。