《SQLServer实用教程第13章.ppt》由会员分享，可在线阅读，更多相关《SQLServer实用教程第13章.ppt（25页珍藏版）》请在金锄头文库上搜索。
1、第13章Delphi/SQLServer开发与编程13.1Delphi数据库应用程序设计13.1.1Delphi数据库应用程序结构Delphi7数据库应用程序在逻辑上通常由两部分构成：一是数据库访问链路，二是用户界面，如图13.1所示。1. 用户界面用户界面用户界面使用在窗体上放置数据显示/编辑组件的方式来实现，数据显示/编辑组件在Delphi7组件面板的DataControls页中。13.1.1Delphi数据库应用程序结构2. 数据源数据源数据源组件是数据显示组件和数据集组件之间的中介，数据集从数据库获得数据后，将其发送到数据源，然后数据源将数据送到界面上的数据显示组件进行显示。3. 数据
2、集数据集数据集是数据库应用程序的核心。数据集组件保存了一系列从底层的数据库取出的记录。这些记录的数据可以取自一个数据表、一个数据表的若干个字段、多个数据表的若干字段。4. 连接部分连接部分不同类型的数据集采用不同的机制连接底层数据库。常见的有BDE和ADO方式。5. 数据模块数据模块数据模块用于放置数据库组件，相当于一个容器。通过数据模块组件来组织数据库组件有以下二个主要的优点：一是这些不可视组件不用直接放在窗体上了，简化了窗体的设计。二是可以对数据库相关组件进行统一管理，共享相同的内容。13.1.2ADO组件ADO组件位于组件面板的ADO页，如图13.2所示。1. ADOConnection
3、组件组件ADOConnection组件的主要作用是建立与数据库的连接。使用ADO访问数据库，必须先与其连接。ADOConnection组件通过ConnectionString属性的设置和操作建立与数据库的连接。13.1.2ADO组件(1)向当前窗体上添加一个ADOConnection组件并选中这个组件，在对象浏览器中双击这个组件的ConnectionString属性，弹出如图13.3所示的对话框；选中UseConnectionString，单击“Build”按钮。13.1.2ADO组件(2)系统将弹出“数据链接属性”对话框，如图13.4所示。对于SQLServer2000数据库，选择“Micr
4、osoftOLEDBProviderforSQLServer”，单击“下一步”按钮。13.1.2ADO组件(3)在所出现的如图13.5所示的“数据链接属性”对话框的“连接”页上输入数据库服务器名称、输入服务器登录信息、选择数据库名称，然后点击“测试”，若所设置的属性正确，则将出现如图13.6所示的测试连接成功对话框。13.1.2ADO组件2. ADODataSet组件组件ADODataSet组件的主要属性有ConnectionString、Connection、CommandText和CommandType。(1)ConnectionString属性ConnectionString属性用来指明
5、数据库连接信息。(2)Connection属性Connection属性用来指明ADO组件与数据库联系的方式。(3)CommandText属性CommandText属性用于存储SQL语句、数据表名或存储过程名。13.1.2ADO组件(4)CommandType属性CommandType属性用于指出CommandText中所存储的命令类型，常用的CommandType属性值的含义列于表中。常用值含义CmdTextCommandText存储的是SQL命令CmdTableCommandText存储的是数据表名CmdStoredProcCommandText存储的是存储过程名CmdTableDirect
6、CommandText存储的是数据表名，并且数据表所有字段都会回传在结果的数据集中。13.1.2ADO组件3. ADOTable组件组件ADOTable组件主要用来从单个数据表中读取数据，它的主要属性有ConnectionString、Connection和TableName。4. ADOQuery组件组件它的主要属性有ConnectionString、Connection、DataSource、SQL和Parameters。ConnectionString和Connection属性的含义与使用同ADODataSet组件。5. ADOStoredProc组件组件它的主要属性有Connectio
7、nString、Connection、DataSource、ProcedureName和Parameters。DataSource指出数据源名称，ProcedureName是需执行的存储过程名，Parameters存储的是执行存储过程所需的参数。6. ADOCommand组件组件它的主要属性有ConnectionString、Connection、CommandText、CommandType，这些属性的含义和使用方法同ADODataSet组件。13.1.3数据源组件和数据显示/编辑组件1.数据源组件数据源组件数据源组件位于组件面板的DataAccess页上，如图13.7所示。数据源组件在AD
8、O数据集组件(包括ADODataSet、ADOTable、ADOStoredProc和ADOQuery等)与数据显示/编辑组件之间提供了一个接口，起着两者之间通信的媒介作用。数据源组件的主要属性是DataSet，用于指出数据集。13.1.3数据源组件和数据显示/编辑组件2. 数据显示数据显示/编辑组件编辑组件组件面板的DataControls页中的组件主要用于显示或编辑数据源提供的数据，如图13.8所示。常用的数据编辑/显示组件是DBGrid、DBNavigator、DBText、DBEdit、DBMemo和DBImage组件等。1) DBGrid组件组件DBGrid组件采用网格的方式显示数据
9、表中指定字段的数据，并能够让用户编辑这些数据。表13.2列出了DBGrid组件的主要属性值及含义。DBGrid组件的事件列于表13.3中。13.1.3数据源组件和数据显示/编辑组件属属性性含含义DataSource该属性指定DataAccess组件的数据源，通过这个数据源DataControl组件才能访问数据库中的数据。该属性一般可以通过下拉菜单进行选择Columns该属性是TColumn对象的集合，该集合中的每一个对象均有一个索引值，用以指定DBGrid中的列和DataSource相联系的数据集组件中字段的对应关系FixedColor该属性指定DBGrid边框的颜色(滚动条的颜色不会改变)O
10、ptions该属性描述了DBGrid的性质TitleFont该属性设置表格中的标题的字体事件名事件名含含义OnCellClick该事件在鼠标选中表中的单元格并释放鼠标右键时被触发OnColEnter该事件在焦点移向新的单元格的时候被触发OnColExit该事件在焦点离开单元格之前被触发OnColumnMoved该事件当用户用鼠标移动表格的列时被触发OnDragDrop该事件当用户放下一个拖动的对象时被触发OnDragOver当用户拖动一个对象到组件之上时被触发13.1.3数据源组件和数据显示/编辑组件2) DBNavigator组件组件DBNavigator组件主要用来执行在数据集中浏览数据和
11、编辑数据的操作，如记录定位、插入记录、删除记录、保存用户对记录的修改等。DBNavigator的外观见图13.9，各个按钮功能描述见表13.4。提示信息提示信息功能描述功能描述Firstrecord数据库中的指针位置指向第一条记录Priorrecord使数据库中的指针位置指向当前位置的前一条记录Nextrecord使数据库中的指针位置指向当前位置的后一条记录Lastrecord使数据库中的指针位置指向最后一条记录Insertrecord向数据库中插入一条记录Deleterecord删除数据库中的一条记录Editrecord使数据库中的记录处于编辑状态Postrecord提交对数据库作的修改Ca
12、nceledit关闭编辑状态，回到浏览状态Refreshdata刷新数据控制组件中的数据13.1.3数据源组件和数据显示/编辑组件DBNavigator组件的主要属性有：(1)DataSource：通过这个属性使本组件与被其控制的数据集联系起来。(2)VisibleButtons：nbFirst、nbPrior、nbNext、nbLast、nblnsert、nbDelete、nbEdit、nbPost、nbCancel、nbRefresh这10个子属性分别对应着10个按钮，不同的组合使DBNavigator组件显示出不同的状态。(3)Hints：程序运行时，鼠标移至DBNavigator某按钮
13、时弹出的提示信息，通过单击Hints属性右边的省略号可以进入提示信息编辑对话框。(4)ShowHint：为True时，能在运行时刻显示提示信息。(5)Visible：决定在运行中DBNavigator组件是否可见。3) DBText组件组件DBText组件主要用于显示数据集中的字段类型为文本型的字段值，该组件不能用于编辑数据库中的数据。DEText的WordWrap属性设置为True时，允许当所显示值的长度超过DBText设计时的长度时折行显示。13.1.3数据源组件和数据显示/编辑组件4) DBEdit组件组件该组件能显示和编辑数据源中记录的字段，可以参照DBText组件来建立DBEdit在
14、数据库应用程序中的应用。5) DBMemo组件组件在DBGrid中不能显示数据类型为Graph和Memo字段中的内容，可以使用DBMemo及DBImage分别显示字段中的内容。6) DBImage组件组件DBImage组件提供了一种显示数据库中的图像字段的方法，例如SQLServer的Image类型字段，即可用该组件显示。表13.5列出了DBImage组件的主要属性和方法。属性和方法属性和方法含含义AutoDisplay决定是否在运行时自动显示图形。Stretch为True时，通过DBImage组件显示的图形将根据DBImage组件的大小自动调整尺寸。CopyToClipboard该过程将把当
15、前TDBImage组件中显示的图形复制到剪贴板上。CutToClipboard该过程可以把当前TDBImage中的图形剪贴到剪贴板上。LoadPicture该过程将从一个文件中加载图片到当前的TDBImage组件中。PasteFromClipboard该过程将剪贴板上的内容粘贴到当前TDBImage组件中。13.2设计数据模块连接数据库1.创建数据模块创建数据模块(1)启动Delphi7；(2)在主菜单中选择fileNewDataModule，将新建数据模块的Name属性置为“DMCP”，如图13.10所示，此时将新建一个空数据模块DMCP，如图13.11所示。13.2设计数据模块连接数据库2
16、. 向数据模块中添加连接组件向数据模块中添加连接组件(1)在“ADO”组件面板上选择“ADOConnection”组件，将其放入DMCP；(2)将ADOConnection组件的Name属性设置为“ADOCP”，如图13.12所示；(3)设置ADOCP的ConnectionString属性，选择图13.12中“ConnectionString”属性右边的文本框，点击按钮，将出现图13.13所示的设置连接串对话框；13.2设计数据模块连接数据库(4)选择“UseConnectionString”，单击“Build”按钮；在其中选择“MicrosoftOLEDBProviderforSQLServ
17、er”，单击“下一步”；(5)在所出现的界面中输入数据库服务器名、选择身份认证方式、选择数据库CPXS，单击“确定”。(6)在图13.12所示的界面中将ADOCP组件的LoginPrompt属性设置为False。13.2设计数据模块连接数据库【例例13.1】在Delphi7中设计程序将XSBOOK数据库中BOOK表的所有记录显示出来。设计步骤如下：(1)按图13.15所示设计界面：在窗体中放置一个Label组件，其Caption属性为“图书信息”；然后在放置1个ADOConnection、1个DataSource、1个ADOTable和1个DBGrid组件，这4个组件的属性按表13.6设置。组
18、件件类型型组件名件名属性名属性名设置置值ADOConnectionADOConnection1ConnectionString由生成器生成连接字符串LoginPromptFalseADOTableADOTable1ConnectionADOConnection1TableNamexsActiveTrueDataSourceDataSource1DataSetADOTable1DBGridDBGrid1DataSourceDataSource113.2设计数据模块连接数据库(2)单击运行按钮，运行该程序。【例例13.2】直接在窗体中放置数据访问组件，创建一个简单数据库应用程序。（1）选择主菜单下
19、的FileNewApplication，创建一个应用程序。（2）从DataAccess页上将一个数据源组件DataSource拖放到主窗体上。数据源组件在组件面板上位置如图13.16所示。（3）从BDE页上将一个数据表组件Table拖放到主窗体上。数据表组件在组件面板上位置如图13.17所示。13.2设计数据模块连接数据库（4）从DataControl页上将一个表格显示组件DBGrid和一个数据浏览组件DBNavigator拖放到主窗体上。（5）按表13.7设置各组件对象的属性。主窗体如图13.19所示。组件件类型型组件件名名属性名属性名设置置值窗体（Form）FormDBAppCaption
20、第1个Delphi数据库应用数据表（Table）TabStuDatabaseNameXSCJTableNamexs.dbActiveTrue数据源（DataSource）DSStuDataSetTabStu表格显示（DBGrid）GrdStuDataSourceDSStu数据浏览（DBNavigator）NagStuDataSourceDSStu13.2设计数据模块连接数据库（6）运行程序。现在就可以直接在DBGrid上添加、修改、删除数据。例13.2所创建的就是一个基本数据维护的应用程序，不用书写任何程序代码。13.2设计数据模块连接数据库【例例13.3】使用数据模块，创建与例13.2完成同
21、样功能的应用程序。（1）选择主菜单下的FileNewApplication，创建一个应用程序。（2）选择主菜单下的FileNewDataModule，创建一个数据模块。（3）向数据模块中添加一个数据源组件DataSource和一个数据表组件Table，添加了这两个组件后的数据模块如图13.20所示。（4）向主窗体中添加一个表格显示组件DBGrid和一个数据浏览组件DBNavigator，如图13.21所示。（5）保存数据模块单元为DMUStu，保存主窗体单元为FormMain。13.2设计数据模块连接数据库（6）鼠标单击主窗体，选择主菜单下的FileUseUnit命令，选择数据模块对应的单元文件，在本例中对应的单元文件为DMUStu，如图13.22所示。（7）按表13.8设置各组件对象的属性。组件件类型型组件名件名属性名属性名设置置值数据模块（DataModule）DMStuNameDMStu数据表（Table）TabStuDatabaseNameStudentTableNameStudents.dbActiveTrue数据源（DataSource）DSStuDataSetTabStu表格显示（DBGrid）GrdStuDataSourceDMStu.DSStu数据浏览（DBNavigator）NagStuDataSourceDMStu.DSStu（8）单击F9按钮运行程序。
