DBE
连接SQL Server显然用ADO或DBEXPRESS更有优势,起码连接起来比较方便。
BDE的话可以用如下方法:(以下以Delphi7为例,其它版本的DELPHI请自己摸索一下,不过基本相差不大)
1.启动Delphi,选择菜单项 Database->Explorer,在左侧Database列表里面右键,选择New,在弹出的驱动对话框里面选择MSSQL,确定,然后在左侧可以更改名字,如:TEST,然后在选中TEST在右侧选项里面添入ServerName(服务器名) UserName(登录名) DatabaseName(数据库名)
然后Apply并关闭
2.在窗体上添加一个Database控件,右击Database选择Database Editor...
在里面添上数据库在Delphi中的名称、数据库别名,并且添加参数
USER NAME=sa
Password=你的密码
保存返回
3.设置Database的LoginPrompt为False,Connected为True
正常的话,你已经连接至SQL Server了,这个并不算太麻烦,主要是分发的时候会比较费力气,所以最好还是用ADO来连接比较好。
ADO
最简单的方法
放个ADOquary1、Dbgrid1、dataSource1
设置ADOquary1的connect或者connectString属性连接你的数据库
Sql属性里写(select * from 【Table】)
DataSource1的DataSet属性设为AdoQuary1,Dbgrid1的dataSource设为dataSource1,将AdoQuary的Active属性改为True就可以运行结果了
Firebird火鸟+DbExpress(库后缀为*.DB)
1.TSQLConnection1 -TSQLDataSet1-TDataSetProvider1-ClientDataSet1-DataSource1
(几个控件全部是属性连接的,第一个用代码连接库的。)
procedure TForm1.FormCreate(Sender: TObject);beginif SQLConnection1.Connected=true then SQLConnection1.Connected:=false; SQLConnection1.Params.Clear; SQLConnection1.Params.Values['user_name']:='sysdba'; SQLConnection1.Params.values['password']:='masterkey.pub'; sqlConnection1.Params.Values['SQLDialect']:='3'; SQLConnection1.Params.Values['database']:=extractfilepath(paramstr(0))+'DATA.DB'; SQLConnection1.Connected:=true;end;
procedure TForm1.Button1Click(Sender: TObject);begin
with SQLDataSet1 do begin Close; CommandText:='select * from TORDERf'; Open; end;
ClientDataSet1.Active:=True;
end;
发布程序:
1. midas.dll 放入C:\WINDOWS\system32中。 在“执行”中,执行regsvr32 C:\WINDOWS\system32\midas.dll。注册
2.EXE程序的同目录下必须有dbexpint.dll、GDS32.DLL二个文件。
3.电脑上必须安装FBWin32.exe。
DB2事务处理方法(DELPHI版)
1. 引用单元
uses DBXpress;
2.定义事务
var
G_TD: TTransactionDesc;//mysql事务
3.使用事务
procedure TForm1.Button1Click(Sender: TObject);
begin
G_TD.TransactionID:= 1; //mysql事务ID
G_TD.IsolationLevel:= xilREADCOMMITTED; //mysql事务级别
try
SQLConnection1.StartTransaction(G_TD);
...
...
SQLConnection1.Commit(G_TD);
except
SQLConnection1.Rollback(G_TD);
end;
end;
VF DBF数据库
连接DBF数据 构造ado connection string 提供者选择 Microsoft Jet 4.0 OLEDB Provider "所有 "那里编辑 Extended Properties, dbf文件的话设置为dBase 5.0(注意dBase和5.0之间必须有空格,最好拷贝过去粘贴) db文件的话设置为Paradox 7.X (dbf就是dbase或Vfox数据库,db就是paradox数据库) “连接”那里的“数据库名称”输入的是目录名,不能包含文件名, 比如你的文件是 c:\temp\aaa.dbf ,那么输入c:\temp 同时CursorLocation 设置为: clUseServer
还可以: 如果直接连的话,ADO的连接字串设为: adoConnection1.ConnectionString:= 'Provider=MSDASQL.1;Extended Properties= "Driver={Microsoft Visual Foxpro Driver};SourceType=DBF;SourceDB=c:\mydb " '; 如果是用ODBC,先在ODBC中设一个DSN连接到该DBF库,然后,在ADOConnection中设置连接ODBC的连接字串即可(可以用向导帮助完成) DB Paradox (delphi 自代的数据库)with con1 dobegin Connected := False; ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0; User ID=Admin;Data Source=F:\pakageTest;Mode=Share Deny None;Extended Properties=Paradox 7.X;Persist Security Info=False '; LoginPrompt := False; Connected := True;end;
qry1.close;
qry1.SQL.Text := 'select * from inf';qry1.Open;注意:如果电脑上出现,无法使用。是驱动的问题。查看 "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Jet\4.0\ISAM Formats\Paradox 7.X "是否存在,如果不存在表示驱动版本不对。最新jet4.0下载