分类:
2010-09-10 10:50:37
procedure TForm1.Button1Click(Sender: TObject); // 插入图片过程
var
Stream:TMemoryStream;
begin
try
Stream := TMemoryStream.Create; // 创建内存流
Image1.Picture.Graphic.SaveToStream(Stream); // 将图片保存到内存流中
adoquery1.Close;
adoquery1.SQL.Clear;
adoQuery1.SQL.Add('Insert into tbltemp (Image) values (:photo)'); // 进行插入操作
adoQuery1.Parameters.ParamByName('photo').LoadFromStream(Stream,ftBlob); // 读取保存的内存图
adoquery1.ExecSQL;
finally
Stream.Free; // 释放内存流
end;
end;
procedure TForm1.Button2Click(Sender: TObject); //读取图片过程
var
Stream:TMemoryStream;
Jpg:TjpegImage;
begin
ADOQuery1.Close;
ADOQuery1.SQL.Text:='SELECT * FROM tbltemp'; // 查询图片
ADOQuery1.Open;
if not ADOQuery1.FieldByName('Image').IsNull then
begin
Stream:=TMemoryStream.Create ;
Jpg:=TjpegImage.Create ;
TBlobField(ADOQuery1.FieldByName('Image')).SaveToStream(Stream); // 显示的转换为BlobField并保存到内存流
Stream.Position :=0;
jpg.LoadFromStream(Stream); // 加载图片
image2.Picture.Assign(Jpg);
end
else
begin
image2.Picture :=nil;
end;
end;
chinaunix网友2011-07-21 15:15:29
[url=http://www.made-in-china.com/showroom/kittygztoppower/product-list/catalog-1.html/]DC-DC converter[/url] [url=http://www.made-in-china.com/showroom/kittygztoppower/product-list/catalog-1.html]power supply[/url] [url=http://www.made-in-china.com/showroom/kittygztoppower/product-list/catalog-1.html]power module[/url] [url=http://www.made-in-china.com/showroom/kittygztoppower/product-list/catalog-1.html]switching power supply[/url] [url=http://www.made-in-china.com/showroom/kittygztoppower
chinaunix网友2010-10-23 12:16:05
[url=http://www.hopebright-led.com]led auto bulb[/url] [url=http://www.hopebright-led.com]led auto light[/url] [url=http://www.hopebright-led.com]led auto lights[/url] [url=http://www.hopebright-led.com]led auto lighting[/url] [url=http://www.hopebright-led.com]led auto lamp[/url] [url=http://www.hopebright-led.com]led car bulb[/url] [url=http://www.hopebright-led.com]led car light[/url] [url=http://www.hopebright-led.com]led car lights[/url] [url=http://www.hopebright-led.com]led car li
chinaunix网友2010-09-24 16:49:30
[url="http://www.cf8.com.cn/adql.html"]钱龙[/url] [url="http://www.cf8.com.cn/adzqzx.html"]证券之星[/url] [url="http://www.cf8.com.cn/adznz.html"]指南针[/url] [url="http://soso.cf8.com.cn"]超赢数据[/url] [url="http://soso.cf8.com.cn/]资金流向[/url] [url="http://bbs.cf8.com.cn"]财富赢家论坛[/url] [url="http://blog.cf8.com.cn/]财富赢家博客[/url] [url="http://www.yfcj.com.cn"]股票软件[/url] [url="http://www.yfcj.com.cn/html/dazhihui"]大智慧[/url] [url="http://www.yfcj.com.cn/html/tonghuashun"]同花顺[/url] [url="http://www.yfcj