导航:
论坛 -> DELPHI技术
斑竹:liumazi,sephil
作者:
2003/6/2 17:11:25
标题:
如何将一个bmp图像放大或缩小后再存,大小由我们自己决定
浏览:2537
加入我的收藏
楼主:
请速回复,感谢!
----------------------------------------------
-
作者:
boy (阿門)
★☆☆☆☆
-
盒子活跃会员
2003/6/3 2:20:32
1楼:
改變圖像大小 Image1.Stretch:=True; Image1.Height Image1.Width
----------------------------------------------
Delphi開發◆伺服器架設◆免安裝APACHE,PHP,CGI Perl, MYSQL ★
作者:
boy (阿門)
★☆☆☆☆
-
盒子活跃会员
2003/6/3 2:24:08
2楼:
將 BMP圖形存到Blob Field: TBlobField(Table1.FieldByName('LOGO')).LoadFromFile(OpenDialog1.FileName);
----------------------------------------------
Delphi開發◆伺服器架設◆免安裝APACHE,PHP,CGI Perl, MYSQL ★
作者:
boy (阿門)
★☆☆☆☆
-
盒子活跃会员
2003/6/3 2:28:29
3楼:
如何將圖片文件存到數據庫中。 http://www.2ccc.com/bbs/topic.asp?topicid=17933 未驗証 var bmp:Tbitmap procedure Torm.openbuttonclick(sender:tobject); begin if opendialog1.execute then image1.picture.loadfromfile(opendialog1.filename); end; procedure tform1.appendclick(sender:tobject); begin table1.append; bmp:=Tbitmap.create; bmp.assign(image.picture.bitmap); table1.fields[0].assign(bmp); //table1中就一個字段,為圖符型 table1.post; end;
----------------------------------------------
Delphi開發◆伺服器架設◆免安裝APACHE,PHP,CGI Perl, MYSQL ★