Delphi 程序设计基础与上机指导演讲稿 第10章

Delphi程序设计基础与上机指导第十章数据库应用程序设计基础BDE概述别名机制名称连接信息设置别名工具BDEAdministrator新建别名别名类型连接参数设置建立基于BDE的数据库连接设置参数在设计时刻设置连接参数数据库、登录运行时设置参数dbeDatabase.AliasName:='DBDEMOS';dbeDatabase.LoginPrompt:=False;dbeDatabase.DatabaseName:=DatabaseName;dbeDatabase.Params.Clear;数据集组件设计时刻设置数据集组件数据库名表名打开运行时刻设置数据集组件tblCountry.DatabaseName:=DatabaseName;tblCountry.TableName:='country.db';tblCountry.Active:=True;查询数据集组件设计时刻设置数据集组件数据库名SQL语句打开运行时刻设置数据集组件qryTemp.DatabaseName:=DatabaseName;qryTemp.SQL.Text:='SELECT*FROMcountry';qryTemp.Active:=True;建立基于ADO的数据库连接建立连接使用连接字符串编辑工具数据库类型登录打开使用代码建立连接cnnDatabase.ConnectionString:='Provider=SQLOLEDB.1;PersistSecurityInfo=False;UserID='+UserName+';Password='+Password+';InitialCatalog='+DatabaseName+';DataSource='+DatabaseServer;浏览编辑数据数据源组件TDataSource几个重要属性与数据集组件的结合数据感知组件意义与功能与数据源组件的结合几个典型的数据感知组件的用法辅助代码实例程序辅助代码－思考数据库的高级编程查看相关图书黑皮书系列－－Delphi数据库编程实例网络的高级编程查看相关图书黑皮书系列－－Delphi网络编程实例多媒体的高级编程查看相关图书黑皮书系列－－Delphi多媒体编程实例文件的版本信息主要接口一个函数functionGetVersionSetting(inp:String):String;三个属性propertyFileName:StringreadFFileNamewriteSetFileName;propertyVersionStrings:TStringListreadFmyVersionStrings;propertyVersionCategories:TStringListreadFmyVersionCategories;类的完整实现文件的版本信息提取版本信息创建窗口参照实例程序使用类TGetVersionInfoFromFile初始化调用实例程序文件的版本信息通过专门书籍了解类的属性私有成员成员函数使用文件句柄打开和创建文件利用函数FileOpen多种打开模式fmOpenReadfmOpenWritefmOpenReadWritefmShareExclusivefmShareDenyWritefmShareDenyReadfmShareDenyNone使用文件句柄关闭文件FileClose光标定位函数：FileSeek函数：FileSeek（重载）使用文件句柄读取数据函数FileReadFileRead(FFileHandle,Output[0],1024*50-1);写入数据函数FileWriteFileWrite(FFileHandle,PChar(Input)[0],Length(Input));实例程序使用文件句柄－思考有关文件句柄控制文件的方法的进一步学习使用文件变量与文件变量关联关联文件变量是进行文件操作的前提这是Pascal内置的方法函数AssignFile打开文件Reset或者Rewrite方法关闭文件CloseFile方法使用文件变量定位光标函数Seek参数含义获取光标位置函数FilePos使用文件变量读取数据函数ReadRead(FTextFile,Output);写入数据WriteWrite(FTextFile,PChar(Input));使用文件变量－思考参考资料，学习实例程序文件的流操作创建实例使用Create方法FFileStream:=TFileStream.Create(FDefaultFileName2,fmOpenReadWrite);读写文件流读：FFileStream.Read(Output[0],1024*50-1);写：FFileStream.Write(PChar(Input)[0],Length(Input));