当前位置: 首页 > 学习 > 电脑学习 > 程序设计 > Delphi > 编程技巧 > 正文

在delphi.net的VCL.net里使用Ado.net

http://www.zk168.com.cn  招考学习网 2006-4-7 10:09:00
-----------------------------------------------------------[交流]-[打印]-[发送]-[收藏]--
在delphi.net中,VCL.net有两点蛮遗憾的:
1.不能使用ADO(dbGo),不过据李维说以后将会有这个组件。
2.不能使用ADO.net和BDP,这将是我这片文章的主题。

在Borland的delphi交流区内,曾经看到Danny说过,"在delphi.net中VCL.net可以调用Winform组件,同样Winform也可以调用VCL.net组件"。

为了验证第一句话,我试了下,在Vcl.net中是可以使用 .Net的组件的,如可以直接uses System.Data.SqlClient,并直接使用 SqlConnection类。也就是说,虽然VCL.net的组件面板中无法看到.net组件,但是所有的.net组件的类,VCl.net都可以使用! 但是,Ado.net的dataset并不和VCl.net的Dataset组件兼容,所以无法直接调用数据感知组件。不过,看了李维的Inside Vcl知道原来有一个ADONETConnector组件,用了这个组件,可以使Ado.net支持使用数据感知组件了。
首先,VCL.net组件的dll在BDS\2.0\Bin 下有一个Borland.Vcl.Design.AdoNet.dll,单击Install .net component菜单,然后在窗体的.net vcl components页中把这个dll Add一下,就可以看见ADONETConnector组件。然后加一个Dbgrid,db....,datasoure....,只要datasource.dataset:=ADONETConnector1。其它的和原来的delphi一样,就可以了。同样改方法对BDP也有效。

我的具体代码如下,

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs,
System.Data.SqlClient,
System.Data, System.ComponentModel, Borland.Vcl.StdCtrls,
Borland.Vcl.ExtCtrls, Borland.Vcl.DBCtrls, Borland.Vcl.Grids,
Borland.Vcl.DBGrids, Borland.Vcl.Db, Borland.Vcl.ADONETDb;

type
TForm1 = class(TForm)
Button1: TButton;
ADONETConnector1: TADONETConnector;
DataSource1: TDataSource;
DBGrid1: TDBGrid;
DBNavigator1: TDBNavigator;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
Connection:SqlConnection;
ProDataSet : DataSet;
Adapter : SqlDataAdapter;

public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.nfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
Connection := SqlConnection.Create('... ');
Connection.Open;
ProDataSet := DataSet.Create;
Adapter := SqlDataAdapter.Create('select * from Product', Connection);
Adapter.Fill(ProDataSet, 'Product');
ADONETConnector1.DataTable:=ProDataSet.Tables[0];
end;

end.

-----------------------------------------------------------[交流]-[打印]-[发送]-[收藏]--
最新入库:
 
·实质、过程及意义——阿多尔诺“否定的辩证法”探微
·从Ontology的译名之争看哲学术语的翻译原则
·论马克思主义哲学经典的解释——解释学方法及其在马克
·中国哲学当前的核心与周边问题
·和合学与21世纪文化价值和科技
·中国文化的和合精神与21世纪
·宗教之间理当相互宽容
·上半个世纪的自由主义
·殷周至春秋时期神人关系之演进
·大学之道:构建以“三纲八目”为核心的道德修养体系
相关内容:
 
·环保企业人力资源开发与管理的实证研究————巨龙公
·21世纪以煤和天然气为原料的C1化学
·重油制气污水处理系统(A/O)技术改造
·OECD主要国家软件业发展概况
·英美CPA管理模式及其启示
·沙角C电厂事故顺序记录的通道组态分析及整改
·改造NERA微波公务信道为国产监控信道
·LFCB-102型微波分相差动保护的应用
·沙角C电厂厂用电结线分析
·EAStudio让电子商务网站如虎添翼
网友点评:
 
会员名称:
密码:匿名 ·注册·忘记密码?
评论内容:
(最多300个字符)
  查看评论
友情提醒:
 1.库中的资料大都来自互联网、网友上传、各类书籍,在录入的过程中难免会出现错误,恳请网
 友来信指正!
 2.如果网友在本库中未能找到所需要的材料,请登陆到我们的论坛《招考学习网》版块!
 3.考友想加入招考学习网的编辑部,请发信到XueXiWang#Gmail.com(#改为@)附带个人简历
 4.如需转载请注明出处及作者,谢谢合作!
 5.如果您有更好的建议或意见请EMAIL:XueXiWang#Gmail.com (#改为@)
 6.凡标题中有注有“[NO]”字样均不含答案且答案整理中.
 7.如本库中转载文章涉及版权等问题,请相关网站或作者在两周内发邮件通知(EMAIL:  XueXiWang#Gmail.com (#改为@))我们,我们接到通知后立即删除该文章及链接!
你问我答 更多>>