开发数据库程序经验三则

1.建立临时表
  数据输入是开发数据库程序的必然环节。在Client/Server结构中,客户端可能要输入一批数据后,再向服务器的后台数据库提交,这就需要在本地(客户端)建立临时数据表来存储用户输入的数据,待提交后,清除本地表数据。这种方法的好处是:提高输入效率,减小网络负担。

  由于用户一次输入的数据量一般情况下较小(不会超过几百条记录),所以临时表可以建立在内存中,这样处理速度较快。
  方法1:使用查询控件(TQuery)
  第1步:在窗体上放上查询控件(TQuery),设置好所连接的数据表。
  第2步:使TQuery. CachedUpdates=True;
         TQuery. RequestLive=True
  第3步:在原有的SQL语句后加入一条Where子语句,要求加入这条Where子语句后SQL查询结果为空。
  例如:
     SELECT Biolife.″Species No″, Category, Common_Name, Biolife.″Species Name″, Biolife.″Length (cm)″, Length_In, Notes, Graphic
       FROM ″biolife.db″ Biolife
       where Biolife.Category=′A′ and Biolife.Category=′B′
  这样临时表就建立完成了。

  方法2:使用代码创建临时表
  代码如下:
  function CreateTableInMemory(const AFieldDefs:TFieldDefs):TDataSet;
  var
           TempTable:TClientDataSet;
  begin
   TempTable:=nil;
   Result:=nil;
   if AFieldDefs<>nil then
   begin
     try
       TempTable:=TClientDataSet.Create(Application);
       TempTable.FieldDefs.Assign(AFieldDefs);
       TempTable.CreateDataSet;
       Result:=(TempTable as TDataSet);
     Except
       if TempTable<>nil then
                     TempTable.Free;

        Result:=nil;
       raise;
     end
    end
 end;

  在程序中按如下方法使用:
  procedure TForm1.Button1Click(Sender: TObject);
  var
           ADataSet:TDataSet;
  begin
   ADataSet:=TDataSet.Create(Self);
   with ADataSet.FieldDefs do
   begin
      Add(′Name′,ftString,30,False);
      Add(′Value′,ftInteger,0,False);
   end;

   with DataSource1 do
   begin
      DataSet:=CreateTableInMemory(ADataSet.FieldDefs);
      DataSet.Open;
   end;

   ADataSet.Free;
  end;

  临时表创建完成。

  方法1使用简单,但由于利用查询控件,清空数据时需要查询服务器后台数据库,所以速度稍慢,而且不适用于临时表中各个字段由数个数据表的字段拼凑而成的情况。方法2适用范围广、速度快,但需要编写代码。(代码中TFieldDefs的使用方法十分简单,见Delphi的联机帮助)。

2.配置数据引擎(BDE、SQL Link)
  有关数据库程序分发时,需要携带数据引擎(BDE、SQL Link),并且在客户端安装完程序后还需要配置数据引擎,如用户名(username)、密码(Password)等等。如果手工配置的话,工作量比较大(根据客户机数量而定)。而InstallShield For Delphi又好像没有这方面的选项,其实InstallShield For Delphi可以做到,在生成安装程序的目录里有一个*.iwz的文本文件,只要在[IDAPI Alias]片段中手工加入即可。 例如:
   [IDAPI Alias]
   usesname=SYSDBA
   password=masterkey
  安装程序后数据引擎自动配置完毕。

3.在InterBase数据库中使用函数
  程序员可能在用InterBase作为后台数据库时,会为其提供的函数过少而感到不方便(只有四个),无法方便地编写出复杂的存储过程。InterBase本身无法编写函数,但它可以使用外部函数(调用DLL中的函数)。下例中说明如何在InterBase 中声明SUBSTR函数。
  DECLARE EXTERNAL FUNCTION SUBSTR
   CSTRING(80), SMALLINT, SMALLINT
   RETURNS CSTRING(80)
   ENTRY_POINT ″IB_UDF_substr″ MODULE_NAME ″ib_udf″

  其中:MODULE_NAME为DLL的名称,ENTRY_POINT为函数名。
  声明后便可以使用,例如:
    select SUBSTR(country)
     from country

  本例使用的是Delphi安装时自带的IBLocal数据库。用户也可以自己编写函数来扩充InterBase。

支持Delphi!~ 数据库是20 世纪60 年代末开始兴起的数据处理技术,它以结构化方式存储大量的数据,并由数据库管理系统集中处理数据。 数据库具有数据结构化、数据独立性高、可以方便地实现数据共享等特点,而且便于使用和扩充。 本书通过丰富的实例为读者介绍了如何使用Delphi 开发数据库应用程序,这些实例都具有很高的实用价值。本书通过实例深入讲述了Delphi 数据库编程技术及技巧。 第 1 章介绍了Delphi 数据库开发工具,包括BDE Administrator、SQL Explorer、SQL Monitor 和Database Desktop 等数据库工具的使用。 还介绍了SQL 语言,包括通用SQL 查询语句、更新查询语句、表之间的连接和数据定义语言,并且着重说明了如何在Delphi中使用SQL 语句创建查询。 第 2 章首先介绍Delphi 文件管理的基本概念和标准过程/函数,并提供了一个记录文件的应用实例,最后提供了一个综合应用Delphi 文件管理功能的文件管理程序实例。 第 3 章通过“学生名册管理系统”的开发介绍了如何使用DAO 技术来设计数据库应用程序。 第 4 章介绍了Delphi 支持的4 种数据交换方式,即剪贴板、动态数据交换(DDE)、对象连接与嵌入(OLE),以及动态连接库(DLLs),并讨论了如何利用这4 种方式实现应用程序间的数据交换。 第 5 章介绍了报表和图表,从QReport 组件开始讲述了报表的概念、实现的主要功能,以及创建报表的方法,还通过一个具体的示例程序说明了如何在Delphi 中处理图表。 第 6 章的实例是一个投递邮件处理系统,该实例能够根据邮件投递人提供的资料管理邮件系统。 第 7 章介绍了书店租赁管理系统的开发过程,从中读者可学习如何尽可能节省人力,自动地完成数据的更新操作。 第 8 章介绍了基于数据库的闹铃程序设计,该实例的特点在于程序界面的背景和程序的声音文件均存储在数据库中,其中涉及到3 种数据库存储方式,即简单数据存储(如字符串和整型数等)、图像数据存储和声音文件存储。 附录 A 介绍了SQL 查询语言。 附录 B 列出了Delphi 中常用组件及其属性、方法和事件。 附录 C 中介绍了在示例中未涉及的有关DAO 技术。

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
©️2022 CSDN 皮肤主题:大白 设计师:CSDN官方博客 返回首页
评论

打赏作者

deng_kun

你的鼓励将是我创作的最大动力

¥2 ¥4 ¥6 ¥10 ¥20
输入1-500的整数
余额支付 (余额:-- )
扫码支付
扫码支付:¥2
获取中
扫码支付

您的余额不足,请更换扫码支付或充值

打赏作者

实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、C币套餐、付费专栏及课程。

余额充值