如何在vb中改變圖片大??？創(chuàng)建一個圖像框和兩個命令按鈕。PrivateSubCommand1_Click()縮小圖1。HeightImage1 .高度*0.9圖1。寬度圖像1 .寬度*0.9末端接頭P

如何在vb中改變圖片大??？

創(chuàng)建一個圖像框和兩個命令按鈕。

PrivateSubCommand1_Click()縮小

圖1。HeightImage1 .高度*0.9

圖1。寬度圖像1 .寬度*0.9

末端接頭

PrivateSubCommand2_Click()放大

圖1。H

如何將圖片存入sqlite？

sqlit: tsqlit:檔案流

開始

(數(shù)據(jù)庫.數(shù)據(jù)庫)

FS :(，fmOpenRead)

SqliteDB。UpdateBlob(更新PhotoLib集照片？其中ID為1，F(xiàn)S)

結(jié)束

讀取圖像控制顯示:

(數(shù)據(jù)庫.數(shù)據(jù)庫)

(Select * From PhotoLib，其中Id1)

:女士([圖片])

如果(MS nil)則

開始

Showm: 0

PIC :

圖片。LoadFromStr:圖片