说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

怎样向SQL Server插入带有Image字段的记录-Delphi资料

HTML文档下载 WORD文档下载 PDF文档下载
怎样向SQL Server插入带有Image字段的记录-Delphi资料

向SQL Server插入记录相信大家都会做,但是如果表中带有Image字段就不好弄了,这里有一个例子,非常安全,同时也向大家展示动态生成控件的技巧(对高手来说班门弄斧了)

procedure Button1Click(Sender:TObject);

var

Query : TQuery;

StringStream : TStringStream;

begin

StringStream := TStringStream.Create ('');

Memo.Lines.SaveToStream (StringStream); //在这里创建一个字符流

StringStream.Position := 0;

Query := TQuery.Create(self); //在这里创建一个临时的Query

Query.DatabaseName := Database.DatabaseName;

with Query.SQL do

begin

Clear;

Append ('INSERT INTO TEST');

Append ('(ID

CONTENT)'); //CONTENT是一个Image字段

Append ('VALUES (:ID

:CONTENT)');

end;

with Query do

begin

ParamByName ('ID').asInteger := StrToIntDef (edtID.Text

0);

ParamByName ('CONTENT').asBlob := StringStream.DataString; //就在这里赋值

end;

StringStream.Free; //用完了马上Free掉

Database.StartTransaction; //开始事务控制

try

Query.ExecSQL; //开始插入记录

Database.Commit; //提交事务

except

Query.Free; //如果出错首先将Query Free掉

Database.RollBack; //回退事务

raise; //重新引发异常,以通知用户

end;

Query.free;

end;

苹果聘女黑客为系统安全员 曾让Vista推迟发布 移动游戏定价之谜:0.99美金行不通 9.99美金和19.99美金才是王道 2012末日年:《时代》评选年度十大App 使用HTML5 Web存储实现离线工作 紧跟亚马逊、谷歌步伐 微软下调Azure云服务价格 云计算一周热点回顾:Hadoop专家分享大数据技术工具与最佳实践 Python之父Guido Van Rossum离开谷歌 一月加盟Dropbox 图灵奖获得者Butler Lanpson:计算机在做些什么 华为高级技术经理Anoop Sam John:HBase的二级索引 秦令今:技术是竞争的核心,形成自己的特色! 兰旭:拒绝同质化,做自己的真材实料! Cloud Foundry直面PaaS对手 初具商用能力 IndieBros访谈:探寻《2+18+200万》背后的故事 移动周报:生存还是毁灭 HTML5未来路在何方? 开发者的新机遇:微软生态系统打开开源大门 阻碍创新:谷歌、Facebook请求驳回抽象专利概念 Apple专利战分析:战火不停 创新不止 史上最牛独立开发者:花20美元狂赚100万美元 Twitter VS. Instagram:照片分享大战爆发 第二届“龙芯杯”中国开源软件设计大赛圆满落幕 TUP Masters第六期实录:Jeffrey Richter讲解Win8应用开发与.NET4.5 [简讯]Bootstrap 2.2.2发布 官博宣布新特性 我们正处于API的黄金时代吗? 敏捷开发的26条至理名言 12月10日:1815年首位程序员Augusta Ada出生 TOP30+应用排行榜:十一月国内外综合榜单 抱大腿:Square礼品卡服务进驻Passbook 科技创新剑指开源产业 “龙芯杯”破题自主研发 25GPU的Linux集群6小时内破解标准Windows密码 Lady Gaga与大数据的“火花” 手势才是王道:3款应用捕获3个设计灵感 作者如何获得他自己编写的程序的版权及著作权? SOS!!请高手速指点, 立刻要用到,谢谢!! 报表字段过长如何分行打印? 急。。。关于字体属性 Jbuilder5.0 注册码,那个想要,我这儿有!今天刚搞到! 高手再哪里,网络程序!!!请赐教,高分!!! 如何在vc中静态调用dl中的函数? 循环里的变量为什么读不出? ADO的问题,请指教 用Delphi6导入VB做的ActiveX控件,为何不能生成VCL类?怎末办? 我给你出个谜语,你帮我解答个问题? 关于SQL SERVER的图片问题 读取二进制注册表的问题! 请问编写AWT的面向对象JAVA程序用哪个开发软件比较好? 关于手机铃声图片的下载 为何去不到记录值? 软件包 给点建议,做什么都打不起精神.学习也学习不进去,我看我要完蛋了都22了什么都不会 菜鸟问题:编译报错(WINDOWS.H already included),急! 数据绑定问题 关于组件ProgID的疑惑: RealPlayer的最新版本是什么? 哪里可以下载? 请教调试问题? 急!我的weblogic的控制台怎么不让进行create操作? 好郁悶啊﹐大家幫幫我﹗ jsp中的select VC中如何打包 在文本中输入,在下拉框中动态显示,大家多帮忙! 寻找算法!! 参与有分了!! 各位大哥,有关软件测试的好书或好的网站能给小妹介绍一下么? 谢谢各位先!! 学习打不起精神.也不刻苦.天天玩,我看我要完蛋了. 软件发布,KindDiary日记软件 PowerBuilder 中Datawindow和Report的本质区别是什么,什么时候该用Report? MEMO字段在SQLSERVER里应为什么类型? 在vc++中client和server端的socket连接断掉了,server端如何能够立刻就知道,而不需server端send的时侯才发觉。 学习c++,到底要看那些方面的书?我现在在看vc++技术内幕,essential c++,effective c++,大家说还应该看什么书? 在VC下使用ODBC绑定时间数据时的问题的解决! 如何动态更改主窗口的菜单? asp编程主题显示,若是汉字则为前15个字,若是字符则前25个,怎么编码?谢谢! 用VBA如何去读服务器上的DOC文档? 一个小而急手的问题 请问哪里有检测IP包的软件? 从网上邻居连接nt时在小窗口中输入用户名和口令的过程如何在程序中实现? 请问:wise的注册吗怎么设置?偶在注册码是不是在第四步--〉对话框--〉注册信息/序列号里,添加了一个编辑文本,但里面就不知道该怎么版了 //牛虻 java applet怎样存取本地文件?我没有更多的分,但我尽己所能 请问:怎么用java执行web页中的javascript脚本? 请问:如何给分?急! 调用动态链结库的错误(BCB调VC的动态链结库)! 兄弟们,ExpressBars 4.1 那里有下的。 请问连接adoconnection的问题? 请大家谈谈自己的学习经验!!现在很多技术,很多书,有些人说:你应该看什么什么书,说了一大堆。我都晕了,不知道自己应该掌握什么? 把一个长36厘米的铁丝围成一个正方体,它的表面积是( ),体积是( ) 一个圆柱长3米,从长的1/3处切一刀,表面积增加了6.28平方米,较长的一段体积是多少立方米?快 车辆时速跑100码的时候是每小时跑100公里吗?能顺便说说发动机转速表是怎么回事吗? .用一根长为48厘米的铁丝制成一个最大的正方体框架,它的表面积是( )平方厘米,体积是 把高1米的圆柱锯成三段,表面积增加了4平方米,原来这个圆柱的体积是()立方米 汽车时速100码相当每小时跑多少公里 用一根24厘米的铁丝做一个正方体,这个正方体的棱长是( )表面积( )体积( )快. 把高1m的圆柱锯成3段,表面积增加了4平方米,原来这个圆柱的体积是多少立方米 汽车以100码的速度撞了狗会怎么样 把这根24厘米长的铁丝围成一个正方体的框架,这个正方体的表面积是(),体积是(),如果把这根铁丝围成一个长方体,这个长方体的长是3厘米,宽是2厘米,高是(). 将一个圆柱平均截成3段,每段长2米,表面积增加16平方米,原圆柱的体积是()立方米. 肩宽1尺1,胸围2尺8分别是多少厘米? 这辆公共汽车里挤满了人 The bus ___ ____ ____people . 蓝鲸每小时游59.5千米,比海豚的速度慢百分之15.海豚每小时游多少千米 肩宽1尺3,腰围2尺2,臀部2尺8,以上数据等于CM啊 看,汤姆正在等公交车.Look ,Tom—— the bus. 蓝鲸每小时可以游60千米,比海豚的速度慢1/7,海豚每小时可以游多少千米?(用方程) 求piece by piece-Feeder的中文歌词是Feeder的 不要搞错 求中文歌词Sitting on a corner streetChildren playing at my feetSee the smiles on ice cream facesFeel myself begin to sinkAs the wind blows through my skinLeaves me open to temptati 那个人正在上公交车. That man ____ ____ ____ the bus. 六年应用题:蓝鲸每小时可以游60千米,比海豚的速度慢7分一,海豚每小时可以有多少千米? three-by-five-inch什么意思 合肥128公交车现在的路线 蓝鲸每小时可以游60千米,比海豚的速度慢1/7,海豚每小时可以游多少千米?(用方程) 一个长方体水池,长5米、宽4米、深3米.在水池里放入36立方米的水,水深米. 王师傅焊接一个正方体框架,共用去铁丝48dm(不计损耗),这个正方体框架的棱长是______dm. 蓝鲸每小时游动的速度是海豚的七分之六正好比海豚慢10千米,蓝鲸和海豚每小时各可以游多少千米?用解方程 2尺3是多少cm 5分之2立方米比600立方分米的比值 3.504 inch OD x 4.0 inch 2尺4等于多少CM? 2分之3立方分米比0.001立方米,15厘米比0.002米,求比值 一条公路15天修完,平均每天修这条公路的几分只几?一个星期修这条公路的几分之几? 2尺等于多少cm 把4分之3立方米:400立方分米化成最简整数比是( ),比值是( ) 这条题怎么样计算:蓝鲸每小时可以游60千米,比海豚的速度慢百分之十五,海豚每小时可以游多少千米? 2尺3换算成CM是多少啊 3.75吨=几吨几千克、、、、、、、、、2时45分=几时 5又5分之4立方米=几立方米几立方分米 一尺,一拳,一寸里具体的数字概念 就是问一尺是多少CM? 3x+2x=145 怎么计算?请说明基本原理及其公式好吗谢谢 Why do you go to school by bus?怎么答? 挖一个长方体形状的水池,水池长为10米,宽为6米,深2.5米,水池占地多少平方米?能盛水多少立方米 一个长方体水池中长是8米,宽5米,池中有水60立方米.池中水深多少米? Why don't you go to school by bus?改为同义句 一个长方体形状的水池,长20米,宽15米,深2米.这个水池最多能蓄水多少立方米的水 一项工程,甲队单独做需要6天完成,已队单独做需要8天完成,如果两队合作3天后,剩下的由已队单独做...快一项工程,甲队单独做需要6天完成,已队单独做需要8天完成,如果两队合作3天后,剩下的 一个圆锥形状的沙堆,底面周长为31.4米,高为6米,每立方米沙重1.2吨,如果用一辆载重2.5吨的汽车来运,重1.2吨,如果用一辆载重2.5吨的汽车来运,几次能运完 挖一个长10米、宽8.5米的长方体形状的水池.挖出153立方米的土,这个水池挖了多深? kgf/cm =9.8N/cmkgf/cm或者N/cm是什么单位,是否还有别的单位能表示N/cm 或者 kgf/cm 某修路队要修一条长800米的公路,已经修了570米,还剩全长的几分之几没有修? 一条公路长20千米,计划15天完成,每天修这条公路的几分之几?修10天还剩下这条铁路的几分之几?还剩多少千 一个长方体形状的水池,长5米、宽2米、深1.5米.在池中注水9吨(1立方米水重1.5吨),池内水深多少米? 修路队每天修路800米,上午修了全长的1/4,下午修了全长的2/5,还剩几分之几没 修 用84厘米长的铁丝可以支撑一个棱长为()厘米的正方体框架.把这个正方体框架的表面贴上彩纸,贴彩纸的面是()平方厘米 5feet 8 inch 是多高? 修路队要在25天修820米长的一段路,平均每天修这段路的几分之几,是【 】米,平均每修1米路要用几分之天 8-10 stitches per inch(SPI)是什么意思? 英语翻译Usinga full 8 1/2- by 11-inch page,draw two concentric circles (a circle within acircle) – the inner circle representing the core of your self-concept and theouter circle the more flexible,changeable selves.Within the inner circle,list 用一根96厘米长的铁丝,做成一个最大的正方体框架,这个正方体的表面积是?体积是? 用一根84厘米的铁丝围成一个正方体框架,再糊上彩纸,共需彩纸多少平方厘米? 修一条路,甲独修20天完成,乙独修要45天完成,两队合修8天后,还剩这条路的几分之几没有修?
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn