如何在数据中能加载.JPG格式的图片

2016-02-19 20:47 7 1 收藏

最近很多朋友喜欢上设计，但是大家却不知道如何去做,别担心有图老师给你解答，史上最全最棒的详细解说让你一看就懂。

【 tulaoshi.com - 编程语言】

　　數據庫table定義
　　create table test(image image)

　　delphi程序
　　ADOQuery1的sql為'select * from test'

　　
　　unit Unit1;

　　interface

　　uses
　　 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
　　 Dialogs,JPEG,StdCtrls, Buttons, ExtCtrls, DB, ADODB;

　　type
　　 TForm1 = class(TForm)
　　    Image1: TImage;
　　    BitBtn1: TBitBtn;
　　    ADOConnection1: TADOConnection;
　　    ADOQuery1: TADOQuery;
　　    ADOQuery1image: TBlobField;

　　    procedure BitBtn1Click(Sender: TObject);
　　 private
　　    { Private declarations }
　　 public
　　    { Public declarations }
　　 end;

　　var
　　 Form1: TForm1;

　　implementation

　　{$R *.dfm}

　　
　　procedure TForm1.BitBtn1Click(Sender: TObject);
　　var
　　 jpeg:TJpegImage;
　　 mem:TmemoryStream;
　　begin
　　   mem:=TmemoryStream.Create;
　　   mem.LoadFromFile('E:AdobeAdobe1.jpg');
　　   ADOQuery1.Insert;
　　   TBlobField(ADOQuery1.FieldByName('Image')).LoadFromStream(mem);
　　   ADOQuery1.Post;
　　   mem.Free;

　　
　　   ADOQuery1.First;
　　   jpeg:=TJpegImage.Create;
　　   TBlobField(ADOQuery1.FieldByName('image')).SaveToFile('E:aa.jpg');
　　   jpeg.LoadFromFile('E:aa.jpg');
　　   Image1.Picture.Assign(jpeg);
　　   jpeg.Free;
　　   deleteFile('E:aa.jpg');

　　end;

　　end.

　　一定要Use JPEG!!!!
　　通过这个方法，任何可被操作系统识别的文件，都可以载入载出到数据库。
　　

来源:https://www.tulaoshi.com/n/20160219/1624509.html

上一篇： windows7系统中怎么隐藏桌面图标提高工作效率保持桌面整洁
下一篇： XP/2003下开放3389最简单的方法

看过《如何在数据中能加载.JPG格式的图片》的人还看了以下文章更多>>

PHP中在数据库中保存Checkbox数据(1)

标签： Web开发

介绍 checkbox是一个非常有用的页面表单项，在让用户进行多重选择的情况下，它甚至可以允许用户选择全部项目或是一个都不选。但是，尽管这是一个非常优秀的表单元素，但在我们的工作中，在如何正确地保存选择项这方面总存在一些易混淆的情况发生。本文将描述在遵循好的数据库设计原则的方法下，如何把checkbox选择项正确地保存在数据库中。...

如何在Excel中获取网络数据

标签： excel

如何在Excel中获取网络数据如何在Excel中添加多个视图？如何在Ex(图老师整理Tulaoshi.com)cel中设置打印区域怎么给Excel中的数据添加单位？

PPT中快速转换成JPG图片

PPT中快速转换成JPG图片 PowerPoint2003是微软公司提供的一款幻灯片制作软件，该软件一般与投影仪来配合使用，不管是在演讲、上课、开会、培训等宣传上，这都是必不可少的工具和设备。如果我们想把PowerPoint演示文稿中相应的幻灯片转换为图片格式，直接另存就可以了，具体怎么操作呢?就让Word联盟为大家带来分享! 动画演示： ...

如何在Excel中数据分列整理