预览加载中,请您耐心等待几秒...
1/5
2/5
3/5
4/5
5/5

在线预览结束,喜欢就下载吧,查找使用更方便

如果您无法下载资料,请参考说明:

1、部分资料下载需要金币,请确保您的账户上有足够的金币

2、已购买过的文档,再次下载不重复扣费

3、资料包下载后请先用软件解压,在使用对应软件打开

第页共NUMPAGES5页基于Delphi的数据库研究【摘要】该文介绍了Delphi的开发环境与SQL数据库技术。Delphi下的数据库开发有着很强的优势,这里对其进行总结,并应用在信息管理系统中。【关键词】Delphi;SQLServer2000;数据库;ADO引言数据库技术是计算机科学中发展最快的领域之一,也是应用最广的技术之一,它已成为计算机信息系统与应用系统的核心技术和重要基础[1]。近年来,随着多媒体技术、空间数据库技术和计算机网络的飞速发展,数据库系统的发展十分迅速,应用领域愈来愈广,企事业单位和政府部门的行政管理、办公自动化;银行财务管理;宾馆、酒店房间预定系统;以及最近google推出的全球卫星定位系统、手机GPRS定位系统,其背后都是一个规模巨大的数据库。而Delphi在Windows系统平台下的可视化编程环境中占有相对的优势,是当前最热门的Windows程序开发环境之一,是用来开发数据库管理系统的主流软件,具有高效、优化和可扩展的数据库技术等特点,其功能十分强大[2]。1、数据库系统理论数据库(Database)是一个长期存储在计算机内的、有组织的、有共享的、统一管理的数据集合。它是一个按数据结构来存储和管理数据的计算机软件系统。数据库为我们提供了一种把与我们的工作和生活机密相关的信息集合在一起的方法,它提供了在某个集中的地方存储和维护这些信息的方法。数据库系统主要由三大部分组成:数据库管理系统、数据库应用程序、数据库。2、Delphi数据库开发优势如果使用数据库语言进行传统的算术编程,虽然也能完成相应的功能,但是其编程过程可能极为复杂[3]。如果使用传统的编程语言进行数据库编程,通过调用专用的数据库应用程序接口函数和过程,利用这些函数和过程提供的功能,可能也能做到的比较完善,但这做起来大多繁琐,然而Delphi结合了俩个体系的优点,将传统的编程语言ObjectPascal和数据库语言的强大功能融为一体,既可以用于传统的算术编程又可以用于数据库编程,特别是Delphi具有强大的数据库功能,利用Delphi的数据库工具,我们根本不需要编写任何ObjectPascal代码便可以创建一个简单的数据库应用。3、Delphi处理数据库方法在Delphi开发中,连接数据库的方法一般使用BDE数据引擎和ADO技术,相对而言,BDE数据引擎有很多的优势,但是Borland公司对BDE数据引擎已经进入了后期维护的阶段,停止了对BDE数据引擎的更新开发。相反,ADO具有了广阔的发展前景。ADO技术是微软提出来的处理关系型数据库和非关系型数据库的新技术,它是专门为了给大范围商业数据源提供访问而设计的,包括传统的关系型数据表、电子邮件系统、图形格式、Internet资源等。ADO所需内存更少,更适合大流量和大失误量的网络计算机系统[4]。虽然ADO的执行效率可能有些不如BDE,但是ADO不仅仅具有BDE的一些优点,它还是通用的数据库访问技术,并得到了广泛的支持,使用范围广,升级和维护比较方便。3.1ADO与SQLServer2000数据库连接在Delphi中提供了ADO作为应用程序和OLE-DB连接的桥梁,ADO是一系列使应用程序具有访问数据库的能力的数据对象。TADOConnection是用来建立与ADO数据库之间联系的组件,各种ADO的数据集及操作组件可以共用这种联系来执行命令,读取数据,并执行相应的操作。3.2Delphi与SQL数据库间的数据运行在SQL数据库中建立产品对应表,作为产品的查询基础信息,通过对应表的设计,将产品信息与客户的内部信息进行有效的关联,再运用Delphi工具开发前台界面,从全部的产品信息中选中客户要求的对应产品添加到产品目录中。通过Delphi开发前台界面删除SQL数据库中的数据,“注销”功能,代码如下:beginadoquery1.Close;adoquery1.SQL.Clear;adoquery1.SQL.add("deletefromcpxsqdwheredjh="""+trim(ComboBox1.text)+"""");ADOQuery1.ExecSQL;showmessage("注销成功,并删除作废单据!");end;3.3在Delphi环境下进行SQL数据库备份和导入数据库的备份问题是开发应用系统中必不可少的一个功能模块,相对于后台手工操作,本文应用程序自动实现这个功能。备份代码如下:beginxxxxandText:="backupdatabaseshxstoDISK="+""""+edit1.text+""""+"withinit";fmbackup.ADOCommand1.Execute;showmessage("备份成功");Edit1.Text:=""