delphi 使用TDatabase连接 sql server的方法
来源:互联网 发布:linux 退出 编辑:程序博客网 时间:2024/06/05 22:58
一、数据库的准备
打开“开始/程序/Microsoft SQL Server/企业管理器”展开“控制台根目录”的目录,在标有“数据库”的目录项上点击右键,再点“新建数据库”,如“TEST”。再右键点击表,新建表,如“TABLE1”。
二、设置ODBC数据源
打开“开始/设置/控制面板/管理工具/数据源(ODBC)”,在“User DSN”下,点Add,选择“SQLServer”,完成,输入数据源名称,如“TEST-ODBC”和SQL Server服务器名称,后面一直点“下一步”到最后一页,再点“Test data source..”检测设置是否正确。如果正确显示“tests completed successfully!”的信息。
三、设置数据引擎
打开“开始/程序/Borland Delphi7/BDE Administrator”,\在"Databases"页面下,可以看到,刚才设置的ODBC数据源“TEST-ODBC”,右键,选择“OPEN”,出现输入"user name"、"Password"的对话框,输入用户名Administrator及密码后点击“OK”使它有效。这时,如果连接正常,右侧的项目名称的字体变成粗体。注意:如要修改参数值,应先鼠标右键点击左侧的数据库名称,选择“Close”,在修改参数值后,用鼠标右键点击左侧的数据库名称,选择“Apply”保存,再选择“OPen”使新的参数值生效。
四、建立连接
在Delphi窗体上添加下列组件:Database、Query、Datasource、DBGrid。其中database是连接SQLServer数据库和Query的桥梁,Query完成具体的查询要求,DBGrid是为了显示数据库内容而添加的。
如未能正常连接,在生成Database中,添加连接代码如下:
Database1.Database1Name := 'md';
Database1.DriverName := 'MSSQL';
Database1.Params.Clear;
Database1.Params.Add('Database1 NAME=' + '''TEST-ODBC'''); //据源名称
Database1.Params.Add('SERVER NAME=' + '''LOCAL'''); ///sql服务器
Database1.Params.Add('USER NAME=' + '''sa'''); //sql服务器登录名
Database1.Params.Add('PASSWORD=' + '''sa123'''); //sql服务器登录密码
Database1.Params.Add('OPEN MODE=READ/WRITE');
Database1.Params.Add('SCHEMA CACHE SIZE=8 ');
Database1.Params.Add('BLOB EDIT LOGGING=');
Database1.Params.Add('LANGDRIVER= ');
Database1.Params.Add('SQLQRYMODE=LOCAL'); /////*********
Database1.Params.Add('SQLPASSTHRU MODE=SHARED AUTOCOMMIT');
Database1.Params.Add('DATE MODE=0');
Database1.Params.Add('SCHEMA CACHE Time =-1 ');
Database1.Params.Add('MAX QUERY TIME=300');
Database1.Params.Add('MAX ROWS=-1');
Database1.Params.Add('BATCH COUNT=200');
Database1.Params.Add('ENABLE SCHEMA CACHE=FALSE ');
Database1.Params.Add('SCHEMA CACHE DIR= ');
Database1.Params.Add('HOST NAME=' + '''MichaelMai.'''); /////*********
Database1.Params.Add('APPLICATION NAME= ');
Database1.Params.Add('NATIONAL LANG NAME=');
Database1.Params.Add('ENABLE BCD=FALSE ');
Database1.Params.Add('TDS PACKET SIZE=4096');
Database1.Params.Add('BLOBS TO CACHE=64');
Database1.Params.Add('BLOB SIZE=32');
Database1.Connected := True;
- delphi 使用TDatabase连接 sql server的方法
- 使用JDBC连接SQL SERVER 2008的方法 SQL2008连接
- delphi中连接sql server 2008 数据库方法
- Delphi连接SQL Server 2000
- Delphi连接SQL Server 2000
- 使用JDBC连接SQL SERVER 2008的方法
- 使用JDBC连接SQL SERVER 2008的方法
- 使用自定义端口连接SQL Server 2008的方法
- 使用JDBC连接SQL SERVER 2008的方法
- 关于使用php连接sql server的方法
- 使用自定义端口连接SQL Server 2008的方法
- Delphi与Oracle,MySQL,SQL Server数据库的连接
- JDBC连接SQL Server 2005 的方法
- SQL Server连接字段的方法
- C#连接SQL Server的方法
- MFC中连接SQL Server的方法
- Myeclipse连接SQL Server 2008的方法
- Hibernate 使用JBOSS 自带JNDI连接池连接SQL SERVER 2005的配置方法
- 【第二章】 IoC 之 2.1 IoC基础 ——跟我学Spring3
- 好莱坞科幻背景(c语言)
- [iOS]git管理工具Sourcetree使用之提交项目到远程仓库(傻瓜式图文教程)
- android 源代码在线查看和索引
- 互联网金融
- delphi 使用TDatabase连接 sql server的方法
- 【Unity】工具类
- 动态改变python的搜索路径
- Qt 无边框、透明、可移动、的个性窗体
- 对大盘的一些看法
- solr源码导入eclipse
- 数据结构与算法分析再读之引论和算法分析
- Scala使用withFilter减少中间数据产生
- 那些我们解过的bug之换状态栏没有sim卡的图标