Delphi下的ADO使用方法!
日期:2007年8月28日 作者: 查看:[大字体 中字体 小字体]-
StringGrid1.Cells[i, Y] := RecordSet.Fields[i].Value;
RecordSet.Move(1, EmptyParam);
Inc(Y);
until RecordSet.EOF;
end;
修改数据
当修改数据时,不能用打开数据集时使用的缺省值,而是应该传递以下的参数:
const
adOpenDynamic = {CONTENT}000002;
adLockOptimistic = {CONTENT}000003;
adCmdUnspecified = $FFFFFFFF;
begin
.. // Call CoCreateInstance
DSN := ’dsn=’ + DSNSTRING;
RecordSet.Open(SELECTSTRING, DSN, adOpenDynamic, adLockOptimistic,
adCmdUnspecified);
.. // Code ommitted here
end;
无论你用的是Variants还是Interfaces,这段代码都将正常工作。
当你的数据集以可读写的方式打开时,如adLockOptimistic方式,就可以修改数据库的内容了:
RecordSet.Fields[0].Value := Edit1.Text;
RecordSet.Update(EmptyParam, EmptyParam);
这段代码可以修改当前记录的内容。当然也可以利用字段数组以及Move方法修改任何记录。如果用的是Variants方式,可以不传递任何参数。
在例子中,我采用了一种简单的方法来编辑表中的字段。如果用户在某一个字段商单击,其数值会显示于编辑框中:
procedure TForm1.StringGrid1SelectCell(Sender: TObject; ACol,
ARow: Integer; var CanSelect: Boolean);
begin
Edit1.Text := StringGrid1.Cells[ACOl, ARow];
end;
用于更新数据的代码如下:
RecordSet.Move(StringGrid1.Row - 1, EmptyParam);
RecordSet.Fields[StringGrid1.Col].Value := Edit1.Text;
RecordSet.Update(EmptyParam, EmptyParam);
第一行将数据集游标移动到表格当前行,第二行修改数据,第三行提交修改。
最后一步将把数据集游标移动到第一条记录,然后调用相同的过程显示修改后的数据库。
RecordSet.MoveFirst;
Display(RecordSet);(出处:急速软件下载学院)
- 上一页 [1] [2] [3] [4] [5]
-
- Delphi下的ADO使用方法! 相关文章:
- ·将来会比较流行的几种导航的方向
- ·把网页保存为图片 换种方式收集有用资料
- ·Windows Vista停止报告程序问题的技巧方法
- ·Photoshop字体安装使用方法和技巧
- ·QQ常在异地登录的原因及其应对方法
- ·不再怕电脑病毒 电脑中毒后的6招处理方法
- ·用JavaScript刷新框架子页面的方法
- ·加快Windows Vista系统窗口打开速度的方法
- ·防范黑客攻击Oracle系统的八大常用方法
- ·轻松方便 三招两式抵制IE的顽固病毒
- Delphi下的ADO使用方法! 相关软件
- ·王牌空战6官方宣传片1
- ·行会2之维京霸主-模拟方式免CD补丁
- ·医院大亨-模拟方式免CD补丁
- ·《苍天》双手大刀操作方法介绍视频
- ·《苍天》偃月刀操作方法介绍视频
- ·做人做事好方法
- ·《方块之旅》游戏试玩
- ·《反恐精英》丹麦电竞组织mYm官方音乐
- ·《鬼泣4》E32007官方游戏画面视频
- ·《GTA4》官方宣传片2
- 特别声明:本站除部分特别声明禁止转载的专稿外的其他文章可以自由转载,但请务必注明出处和原始作
- 者.文章版权归文章原始作者所有.对于被本站转载文章的个人和网站,我们表示深深的谢意。如果本站转
- 载的文章有版权问题请联系编辑人员,我们尽快予以更正. 转载请注明来源:http://www.hackhome.com
精品推荐
热点TOP10
- ·Delphi下的ADO使用方法!
- ·在Delphi中实现数据分析模块的动态报表
- ·在Delphi中控制扫描仪
- ·用拼音首字符来实现检索功能
- ·让Delphi的DBGrid支持鼠标轮
- ·自 动 隐 藏 的 声 象 按 钮
- ·OpenGL简介
- ·用Delphi制作动态有声标签
- ·从 实 例 看 Delphi 4 中 的 动 态
- ·Delphi中为DBGrid控件添加色彩
- ·常用的BCB & Delphi 函数
- ·产生不重复随机数的简便算法
- ·陈经韬2002原创资料
- ·Delphi2005试用版安装指南
- ·Delphi中ListBox控件的六种特效
- ·第三方控件使用方法
- ·关于SMTP和POP3使用及关于客户-服务端的自动连线问题
- ·关于MP3中的ID3V2格式探讨及我写的ID3V2读取源码
- ·监视打印机部分线程内容
- ·获取其他进程中ListView的文本
