delphi7中 当我修改后 点击更新按钮更新数据库中的内容 更新按钮触发事件的代码应该怎么写

添加 ADOQUERY1组件在窗体，设置CONNECTION的连接属性，然后在更新按钮触发事件中添加如下代码：

with adoquery1 do

begin

try

close;

sqlclear;

sqladd('update 表名 set 需要更新的相关字段名='更新内容' ');

excesql;

except

showmessage('更新失败！');

exit;

end;

end;

从开发平台到服务器的向上适化

适化概述

所谓适化就是将桌面应用转化为Client/Server应用

适化是一个很复杂的主题 这里不详细讲述 本节将介绍适化Delphi 应用程序中最重要的方面

适化的主要方面有

● 将数据库从桌面平台到服务器的适化

● 将应用程序转化为Client/Server的适化

适化还需要实现从桌面环境到Client/Server环境的转化

桌面数据库和SQL服务器数据库在许多方面有不同之处 例如

● 桌面数据库用于同一时刻单用户的访问 而服务器用于多用户访问

● 桌面数据库是面向记录的 而服务器是面向集合的

● 桌面数据库将每个表存储在独立的文件中 而服务器将所有的表存储在数据库中Client/Server应用必须解决更新的问题 最复杂的是联接 网络和事务控制

适化数据库

适化数据库包含下列步骤

● 在桌面数据库结构的基础上 定义服务器上的元数据

● 将数据从桌面转化到服务器中

● 解决下列问题

● 数据类型差异

● 数据安全性和完整性

● 事务控制

● 数据访问权

● 数据合法性

● 锁定

Delphi提供了两种方法适化一个数据库

● 使用Database Desktop工具 选择菜单Tools/Utilities/Copy to命令将数据库表从桌面方式拷贝到SQL格式

● 建立应用TBatchMove部件的应用程序

这两种方法都可以将表结构和数据从桌面数据源转化到服务器上 依靠这些数据库 可能需要改变结果表 例如 可能想进行不同数据类型的映射

也可以将下列特征加入数据库

● 完整性约束

● 索引

● 检测约束

● 存储过程和触发器

● 其它服务器特征

如果用SQL脚本和服务器数据定义工具定义元数据会更有效 然后用前面介绍的两种方法转移数据 因为如果是手工定义数据库表 Database Desktop和TBatchMove 部件将只拷贝数据

适化应用程序

在理论上 设计用来访问局部数据的Delphi应用程序做很少的修改就可以访问远程服务器上的数据 如果在服务器上定义适合的数据源 你就能将应用程序指向访问它 这只需简单地改变应用程序中TTable或TQuery部件的DatabaseName属性

实际上 在访问局部和过程数据源之间有许多重要的不同之处 Client/Server应用程序必须解决大量的在桌面应用中所没有的问题

任何Delphi应用程序都能用TTable或TQuery部件访问数据 桌面应用程序通常都是使用TTable部件 当适化到SQL服务器上时 用TQuery会更有效 如果应用程序要检索大量记录 则TQuery部件要略胜一筹

如果应用程序使用统计或数学函数 那么在服务器上通过存储过程执行这些函数会更有效 因为存储过程执行更快 使用存储过程还可以减少网络负载 特别是大量行数据的函数

例如 计算大量记录的标准差

● 如果该函数在客户端执行 所有的值从服务器上检索出来并送到客户端 导致网络拥塞

● 如果该函数在服务器端执行 则应用程序只需要服务器上的答案

Delphi客户/服务器应用实例分析

本节中采用的实例是Delphi 数据库的例子CSDEMO CSDEMO是Delphi客户/服务器编程的示例程序 它采用的数据库服务器是Local InterBase Server

CSDEMO较好地示范了BDE环境的配置 InterBASE Server高级功能应用 SQL服务器联接 触发器应用 存储过程编程和事务控制技术等 具有较高的参考价值 本节讲述下列内容

● 数据库环境介绍

● TDatabase的应用

● 不同数据库表的切换

● 触发器编程

● 存储过程编程

● 事务控制应用

数据库环境介绍

本例中采用的数据库服务器是Local InterBase Server Local InterBase是InterBase Server的单用户版 位 兼容ANSI SQL Local InterBase支持客户/服务器应用在单机上的开发和测试 并且可以很容易地适化到InterBase Server上 因此 开发客户/服务器应用采用Local InterBase作为原型开发环境是很方便的

IBLOCAL的BDE参数

本例中的SQL数据库是IBLOCAL 它是由BDE配置工具（BDECFG EXE）设置参数值 它的各项参数值列于下表

表 IBLOCAL的各项参数值

━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━

参 数 名 参 数 值

────────────────────────────────────

TYPE INTRBASE

PATH

SERVER NAME C:\INTRBASE\EXAMPLES\EMPLOYEE GDB

USER NAME SYSDBA

OPEN MODE READ/WRITE

SCHEMA CACHE SIZE

LANGDRIVER

SQLQRYMODE

SQLPASSTHRU MODE SHARED AUTOMIT

SCHEMA CHCHE TIME

MAX ROWS

BATCH COUNT

ENABLE SCHEMA CACHE FALSE

SCHEMA CACHE DIR

━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━

数据库结构介绍

IBLOCAL数据库的结构都是由InterBase服务器工具交互式SQL工具（ISQL）定义的

用ISQL定义数据库 首先要用Create Database命令建立数据库 建立的新数据库一般是以GDB为扩展名 建立好后 就可以用SQL语言定义数据库表 例如建立EMPLOYEE表的SQL语句如下

定义域名数据类型

CREATE DOMAIN FIRSTNAME AS VARCHAR（ ）

CREATE DOMAIN LASTNAME AS VARCHAR（ ）

CREATE DOMAIN COUNTRYNAME AS VARCHAR（ ）

CREATE DOMAIN EMPNO AS SMALLINT;

CREATE DOMAIN DEPTNO AS CHAR（ ）

CHECK （VALUE = OR （VALUE > AND VALUE <= ） OR VALUE IS NULL）

CREATE DOMAIN JOBCODE AS VARCHAR（ ）

CHECK （VALUE > ）

CREATE DOMAIN JOBGRADE AS SMALLINT

CHECK （VALUE BEEEN AND ）

CREATE DOMAIN SALARY AS NUMERIC（ ）

DEFAULT

CHECK （VALUE > ）

建立EMPLOYEE表

lishixinzhi/Article/program/Delphi/201311/25125

用 Delphi 实现软件的在线升级

实现步骤：

1、网站提供升级信息。

2、使用>

以下是<Delphi的DBGrid的下拉列表>在用 Delphi 开发数据库应用系统时，利用数据网格DBGrid 输入数据时，有些字段只允许某几个固定的字符串，像档案案卷的保管期限，只有“永久”、“长期”和“短期”三种，可否从一个下拉列表中进行选择，从而方便输入和避免输入错误呢？还有一些字段，例如职工信息库中的单位编号（在另外的单位库中保存着单位的详细信息），在输入和显示职工数据时，能否不对单位编号进行 *** 作，而代之于更加直观的单位库中的单位名称呢？答案是肯定的，Delphi 的数据网格控件 DBGrid，支持下拉列表和查找字段的编程，而且，编程的过程都是可视化的，不需要写一行语句。

一、DBGrid 中的下拉列表

在 DBGrid 网格中实现下拉列表，设置好 DBGrid 中该字段的 PickList 字符串列表、初始的序号值 DropDownRows 即可。以职工信息库中的籍贯字段（字符串类型）为例，具体设计步骤如下：

1、在窗体上放置Table1、DataSource1、DBGrid1、DBNavigator1 等控件对象，按下表设置各个对象的属性:

---------------------------------------

对象 属性 设定值

---------------------------------------

Table1 DataBase sy1

Tablezgkdbf //职工信息库

DataSource1DataSetTable1

DbGrid1DataSource DataSource1

DBNavigator1 DataSource Datasource1

-------------------------------------------

2、双击Table1, 在d出的Form1Table1 窗口中，用右键d出快捷菜单，单击Add Fields 菜单项；选择所有的字段后，按OK 按钮。

3、修改第2 步新增字段的 DisplayLabel 属性。以 Table1ZGBH 字段为例，在 Object Inspector 窗口中选择 Table1ZGBH, 修改属性 DisplayLabel= 职工编号，其余字段类似。

4、双击 DBGrid1, 在d出的 Editing DBGrid1Columns 窗口中，单击 Add all Fields 按钮，增加Table1 的所有字段。

5、在 Editing DBGrid1Columns 窗口，选择 jg 这一行，切换到 Object Inspector 窗口，修改它的 PickListStrings 为“湖北枝江市（换行）北京市（换行）河南平顶山市（换行）浙江德清市”

6、在 Form1Oncreate 事件中写入语句：

Table1Open;

7、F9 运行，用鼠标点击某个记录的籍贯字段，右边即出现一个按钮，点击这个按钮，可出现一个下拉列表，包含第5 步中输入的四行字符串，可用鼠标进行选择。当然也可以自行输入一个并不属下拉列表中的字符串。

二、DBGrid 中的查找字段

所谓查找字段 (LookUp Field)，即 DBGrid 中的某个关键字段的数值来源于另外一个数据库的相应字段。运用查找字段技术，不仅可以有效的避免输入错误，而且 DBGrid 的显示方式更为灵活，可以不显示关键字段，而显示源数据库中相对应的另外一个字段的数据。

---- 例如，我们在 DBGrid 中显示和编辑职工信息，包括职工编号、职工姓名、籍贯、所在单位编号，而单位编号来源于另一个数据库表格——单位库，称“单位编号”为关键字段。如果我们直接显示和编辑单位编号的话，将会面对1、2、3 等非常不直观的数字，编辑时极易出错。但是如果显示和编辑的是单位库中对应的单位名称话，将非常直观。这就是DBGrid 的所支持的查找字段带来的好处。

实现DBGrid 的查找字段同样不需要任何语句，具体设计步骤如下：

1、在窗体上放置 Table1、Table2、DataSource1、DBGrid1、DBNavigator1 等控件对象，按下表设置各个对象的属性:

---------------------------------------

对象 属性 设定值

---------------------------------------

Table1 DataBase sy1

Tablezgkdbf //职工信息库

Table2 DataBase sy1

Tabledwkdbf //单位信息库

DataSource1DataSetTable1

DbGrid1DataSource DataSource1

DBNavigator1 DataSource Datasource1

------------------------------------------

2、双击 Table1, 在d出的 Form1Table1 窗口中，用右键d出快捷菜单，单击 Add Fields 菜单项；选择所有的字段后，按OK 按钮。

3、修改第2 步新增字段的 DisplayLabel 属性。以 Table1ZGBH 字段为例，在 Object Inspector 窗口中选择 Table1ZGBH, 修改属性 DisplayLabel= 职工编号，其余字段类似。

4、设置 Table1DWBHVisible=False。

5、在 Form1Table1 窗口，用右键d出快捷菜单，单击 New Field 菜单项，新增一个查找字段DWMC，在d出的窗口设置相应的属性, 按 OK 按钮确认；在 Object Inspector 窗口，设置 Table1DWMCDisplayLabel= 单位名称。

6、在 Form1Oncreate 事件中写入语句：

Table1Open;

7、按 F9 运行，当光标移至某个记录的单位名称字段时，用鼠标点击该字段，即出现一个下拉列表，点击右边的下箭头，可在下拉列表中进行选择。在这里可以看出，下拉列表的内容来自于单位信息库，并且不能输入其他内容。

三、DBGrid 中的下拉列表和查找字段的区别

虽然 DBGrid 中的下拉列表和查找字段，都是以下拉列表的形式出现的，但两者有很大的差别。

1、用 PickList 属性设置的下拉列表，它的数据是手工输入的，虽然也可以在程序中修改，但动态特性显然不如直接由另外数据库表格提取数据的查找字段。

2、用 PickList 属性设置的下拉列表，允许输入不属于下拉列表中的数据，但查找字段中只能输入源数据库中关键字段中的数据，这样更能保证数据的完整性。

3、用 PickList 属性设置的下拉列表设计较为简单。

你是用ADODataSet1组件与DBGrid关联，在“添加”按钮将数据写入数据库后，可执行ADODataSet1Active:=false;ADODataSet1Active:=true;此时DBGrid中的数据将会刷新。其实你不需要用dataTable来添加数据，直接用ADODataSet1也可以添加数据的

以上就是关于delphi7中 当我修改后 点击更新按钮更新数据库中的内容 更新按钮触发事件的代码应该怎么写全部的内容，包括:delphi7中 当我修改后 点击更新按钮更新数据库中的内容 更新按钮触发事件的代码应该怎么写、DELPHI基础教程：Delphi客户服务器应用开发（四）[1]、如何用DELPHI做程序升级的接口(急)等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！