• 设为首页
  • 点击收藏
  • 手机版
    手机扫一扫访问
    迪恩网络手机版
  • 关注官方公众号
    微信扫一扫关注
    公众号

DelphiADO学习笔记

原作者: [db:作者] 来自: [db:来源] 收藏 邀请
Delphi ADO 学习笔记  By Shaoyun 2010-03-16

方法一:需要用到4个组件

实例名 组件名 (面板)
con1    TADOConnection (dbGo)
ds1    TDataSource (Data Access)
tbl1    TADOTable (dbGo)
dbgrd1    TDBGrids (Data Controls)

TADOConnection  用来建立数据库连接
TDataSource 为TDBGrids提供数据来源
TADOTable 用来桥接TADOConnection和TDataSource,建立数据连接通道
TDBGrids 为数据显示控件

最好按顺序添加,不按顺序会出现属性设置时,相应的控件不能显示在下拉列表里

控件的设置:

设置con1的ConnectionString属性,通过向导对话框进行配置
设置tbl1的Connection为con1,Active为True
Active设置后,数据库所有的表就会出现在TableName属性的下拉列表里,选择一个
设置数据源ds1的Dataset为tbl1
设置dbgrd1的DataSource为ds1

OK 运行一下,弹出输入用户名密码对话框,输入,没有的话跳过,好,数据显示出来了
如果TDBGrids显示花屏,设置
dbgrd1.DefaultDrawing:=True

去掉密码输入提示设置
con1.LoginPrompt:=True

这两个属性都可在对象监视器(属性设置)里设置

Delphi的大量VCL控件完成很多工作,这个例子没有写一句代码,只拖几个控件,配置一下属性,就完成所有的操作,这个就是RAD开发工具的高效之处。

测试环境:Windows XP SP3 / Delphi 2010 / Access数据库

当然以上的步骤还可以精简,去掉TADOConnection控件,直接配置tbl1的ConnectionString和tbl1的Active为True,将一二步合并
据我所想,配置tbl1的ConnectionString还是会建立TADOConnection,只不过VCL代劳了而已
这样做操作简单但有个缺点,单个数据源的时候倒不影响,多个数据源的话,浪费资源不说,而且不方便统一管理。 

鲜花

握手

雷人

路过

鸡蛋
该文章已有0人参与评论

请发表评论

全部评论

专题导读
热门推荐
阅读排行榜

扫描微信二维码

查看手机版网站

随时了解更新最新资讯

139-2527-9053

在线客服(服务时间 9:00~18:00)

在线QQ客服
地址:深圳市南山区西丽大学城创智工业园
电邮:jeky_zhao#qq.com
移动电话:139-2527-9053

Powered by 互联科技 X3.4© 2001-2213 极客世界.|Sitemap