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

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

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

PrivateSubCommand1_Click()縮小

圖1。HeightImage1 .高度*0.9

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

末端接頭

PrivateSubCommand2_Click()放大

圖1。H

如何將圖片存入sqlite？

sqlit: tsqlit:檔案流

開(kāi)始

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

FS :(，fmOpenRead)

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

結(jié)束

讀取圖像控制顯示:

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

(Select * From PhotoLib，其中Id1)

:女士([圖片])

如果(MS nil)則

開(kāi)始

Showm: 0

PIC :

圖片。LoadFromStr:圖片