DELPHI盒子
!实时搜索: 盒子论坛 | 注册用户 | 修改信息 | 退出
检举帖 | 全文检索 | 关闭广告 | 捐赠
技术论坛
 用户名
 密  码
自动登陆(30天有效)
忘了密码
≡技术区≡
DELPHI技术
lazarus/fpc/Free Pascal
移动应用开发
Web应用开发
数据库专区
报表专区
网络通讯
开源项目
论坛精华贴
≡发布区≡
发布代码
发布控件
文档资料
经典工具
≡事务区≡
网站意见
盒子之家
招聘应聘
信息交换
论坛信息
最新加入: xiao2024
今日帖子: 18
在线用户: 10
导航: 论坛 -> DELPHI技术 斑竹:liumazi,sephil  
作者:
男 webo (webo) ★☆☆☆☆ -
普通会员
2003/5/30 15:38:37
标题:
如何将图片文件存到数据库中。(急件) 浏览:3018
加入我的收藏
楼主: 我做了一个简单人事管理系统,基本工作已经完成,就是还没有方法将图片文件存到数据库中,请各位大侠帮帮我,请告诉我用哪些控件,并详细一些告诉我部份代码,谢谢!!!
我的QQ:121489348
我的邮箱:andon_panyong@21cn.com
----------------------------------------------
-
作者:
男 hlc_alf ( ) ★☆☆☆☆ -
普通会员
2003/5/30 17:27:24
1楼: 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;
----------------------------------------------
-
作者:
男 Giver (Giver) ★☆☆☆☆ -
盒子活跃会员
2003/5/31 0:39:39
2楼: ADO+Access也可以吗?
----------------------------------------------
http://www.gaiwei.com
作者:
男 whb147 (whb147) ★☆☆☆☆ -
盒子活跃会员
2003/5/31 11:50:20
3楼: no,access 中没有image类型的
你可以存到文件夹里,数据库里给一个连接
----------------------------------------------
郁闷呀
作者:
男 boy (阿門) ★☆☆☆☆ -
盒子活跃会员
2003/5/31 14:48:28
4楼: VAR I :INTEGER;
begin
OpenPictureDialog1.Options :=[ofAllowMultiSelect];
//加入此段可多重選擇存入資料庫檔案
if OpenPictureDialog1.Execute then
begin
for i:=0 to OpenPictureDialog1.Files.count-1 do
begin
ADOTable1.append;
ADOTable1.FieldByName('IMG_FILENAME').AsString:=
Extractfilename(OpenPictureDialog1.Files[i]);
ADOTable1.FieldByName('IMG_FILESIZE').AsInteger:=
filesizes(OpenPictureDialog1.Files[i]);
TBlobField(ADOTable1.FieldByName('IMG_FILEDATA')).loadfromfile(OpenPictureDialog1.Files[i]);
ADOTable1.post;
ADOTable1AfterScroll(ADOTable1);
end;
END;
----------------------------------------------
Delphi開發◆伺服器架設◆免安裝APACHE,PHP,CGI Perl, MYSQL ★
作者:
男 webo (webo) ★☆☆☆☆ -
普通会员
2003/6/5 10:26:22
6楼: 我就是用的ADO+Access,使用DBImage控件,我也像上面Giver说的,在ACCESS中没有Image的,我试试,谢谢各位!我想请Giver能说详细一些吗?

----------------------------------------------
-
作者:
男 lidx_99131 ★☆☆☆☆ -
普通会员
2003/6/5 11:14:32
7楼: 各位好:
    小弟正做毕业设计,需要将图片放到数据库SQL2000中,但我不知道如何下手,还请各位指教。不知楼主是否完成,能否给小弟一个实例。邮箱:jsj_99131@163.com
----------------------------------------------
-
信息
登陆以后才能回复
Copyright © 2CCC.Com 盒子论坛 v3.0.1 版权所有 页面执行70.3125毫秒 RSS