《数据库基础》课程教学资源（PPT课件讲稿）Delphi 7.0开发示例

Delphi7.0开发示例

Delphi 7.0开发示例

回☒ 快速按钮了 控件面板 国围财▣跳路腰最 函oml 回x 回x unit Uniti: interface uses ages SysUtils,Variants,classes,Graphics,Controls,Forms, 设计窗体 ss (TForm) declarations} public end: 代码（单元） 窗口 implementation (R w.drm) end. 对 Auto 浏览器 \Code ADiacrem clBtnFace 3D

对象 浏览器 控件面板 代码（单元） 窗口 快速按钮 菜单

快速按钮栏 Open Add to Remove New Open Save Save all Project Project from Ttem Project View View Toggle New Run Trace Trace Unit Form View/Form Form into over 概念：Form（窗体)Unit（单元)

New Ttem Open Save Save all Open Project Add to Project Remove from Project View Unit View Form Toggle View/Form New Form Run Trace into Trace over 快速按钮栏 概念：Form （窗体）Unit（单元）

对象浏览器(Object Inspector)) Object Inspector Form1 TForm1 Properties Events 属性 Action 属性值 ActiveControl Align alNone AlphaBlend False AlphaBlendVal 255 大多数属性值可以在design time修改 田Anchors akLeft.ak Top] AutoScroll [rue 概念：design time和run time AutoSize False BiDiMode bdLeftToRight 田Borderlcons [biSystemMenu, BorderStyle bsSizeable BorderWidth 0 Caption Form1

对象浏览器(Object Inspector) 属性 属性值 大多数属性值可以在design time修改 概念：design time和run time

控件面板(Component annel) Component Group Standard Additional]Win32]Sustem DataAccess]Data Controls]dbExpress]DataSnap BDE ADO 国風贴圍黑冒 数据库连接控件组：BDE、ADO、dbExpress 数据访问控件组：Data Access 数据控制控件组：Data Control

控件面板(Component annel) Component Group 数据库连接控件组：BDE 、ADO 、dbExpress 数据访问控件组：Data Access 数据控制控件组：Data Control

Delphit访问SQL Server:步骠 1.放置ADOConnection组件 Run Component Database Tools Window Help <None ⊙ Standard Additional Win32 Sustem ADO BDE ADO 口◆ RDS t,▣ 厚國 ▣ Form1 ADO

Delphi访问SQL Server步骤 1. 放置ADOConnection组件

设置connectionString 围数据链接屈性 orm1 提供程序连接高级所有1 SQLOLEDB.1 (ADOConnection1) 由？<>aD0 Table1) 选择您希望连接的数据 OLE DB提供程序 MediaCatalogDB OLE DB Provider Object Inspector MediaCatalogMergedDB OLE DB Provider MediaCatalogWebDB OLE DB Provider ADOConnection1 TADOConnec Microsoft Jet 4.0 OLE DB Provider owse Properties Events】 Microsoft OLE DB Provider For Data Mining Services Microsoft OLE DB Provider for Indexing Service 田Attributes 0 Microsoft OLE DB Provider for Internet Publishing Microsoft OLE DB Provider for ODBC Drivers CommandTimeout 30 Microsoft OLE DB Provider for OLAP Services 8.0 oi色cE0■ ConnectionString ource=202.38.88. icrosoft OLE DB Frovider for SqL Server ConnectionI imeo T5 Microsoft OIE DB Simple Provider Help ConnectOptions OLE DB Provider Directory Services CursorLocation IsolationLevel ilCursorStability LoginPrompt False 下一步)》 M00 cmonknown Name 4) ADOConnection1 Provider SQLOLEDB.1 Tag 0 确定 取消 帮助

设置connectionString

氏围教据链接属性 ☒ 提供程序连接 高级所有 指定下列设置以连接到SQL Server数据： 1. 选择成输入服落器名称乌) 202.38.88.99,1434 (1) 可刷新) 2 前六登录服旁器的信意： C使用Windows NT集成安全设置W) 。使用指定的用户名称和密码)： 用户名称)： student 密码) 半率半*率掌半 T2)】 二空白密码) 铳许保存3) 3. 在职龄器上选择数据库② (3) student (4 附加一个教裾库文件作为数据库名) student 使用文件名)： 测试连接) (5) 确定 (6取消 帮助

2.放置ADOTable Run Component Database Tools Window Help K ⊙ Standard Additional Win32 Sustem ADO Bl 回 ？▣ 7 口◆ RDS A00 ADO 回 Form1 ADO

2.放置ADOTable

Form1 Object Inspector ☒ ADOTable1 TADOTable Properties Events Connection=ADOconnection1 ▣Connection OConnection1 Conneconstng CursorLocation TableName= CursorType ctKeyset EnableBCD True 田ExecuteOptions 0 Filter Filtered False IndexFieldNames IndexName LockType Optimistic MarshalOptions moMarshalAll MasterFields MasterSource MaxRecords 0 Name ADOTable1 ReadOnly TableDirect 2】 TableName titles

.Connection=ADOconnection1 .TableName=