摘要：DisableControls方法是在程序修改或后台有刷新记录的时候切断数据组件，如TTABLE、ADOQUERY等等与组件数据源的联系。如果没有切断，数据源中只要一有数据的改动，尤其是批量改动的话，每一笔的改动都会更新窗口中数据浏览组件的显示，这样会急剧减慢处理过程而且浪费时间。EnableControls的作用相反，用来恢复TTABLE等组件与DATASOURCE的联系，并促使数据浏览组件更新显示。这两个函数主要阻止组件感应显示，以加快语句执行速度。 比如，用大量的循环的时候，最好用他们。1. 数据集的EnableControls, DisableControls方法成对使用的时候, 如果 阅读全文

摘要：Delphi做为一个快速应用开发工具，深受程序员的喜爱。其强大的组件功能，让程序员能够轻松、高效地完成常见的界面开发、数据库应用等功能。然而，帮助的相对缺乏，使得许多组件的功能并不为人们正确地使用，究其原因，仍然是认识上的问题。对于MIDAS开发中的核心部件，TClientDataSet和TDataSetProvider，由于资料的缺乏，人们在网上大多谈论的是李维的书籍内容。我有幸在BDN上见到了Cary Jensen的Professional Developer系列文章，详细阐述了DELPHI的数据库开发技术。现节选出其中的ClientDataSet部分，与大家共同分享。ClientData 阅读全文

摘要：本文来自：万一unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, Grids, DBGrids, DB, ADODB;type TForm1 = class(TForm) DBGrid1: TDBGrid; DataSource1: TDataSource; ADOConnection1: TADOConnection; ADODataSet1: TADODataSet; ADOC... 阅读全文

摘要：本文来自：万一//只要前五条记录procedure TForm1.Button1Click(Sender: TObject);begin with ADODataSet1 do begin Close; CommandText := 'SELECT TOP 5 * FROM country'; Open; end;end;//去除重复procedure TForm1.Button2Click(Sender: TObject);begin with ADODataSet1 do begin Close; CommandText := 'SELECT DISTINCTROW 阅读全文

摘要：本文来自：万一Group By本来 Group By 也可以根据多个字段分组("," 隔开), 但这个例子只有 Continent 字段适合分组, 也只有 Area、Population 字段适合统计.本例效果图:代码文件:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, Grids, DBGrids, DB, ADODB;type TForm1 = class(TFo 阅读全文

摘要：本文来自：万一代码文件://分组条件可以是 Whereprocedure TForm1.Button1Click(Sender: TObject);begin with ADODataSet1 do begin Close; CommandText := 'SELECT Continent, AVG(Area) AS 平均面积 ' + 'FROM country WHERE Continent="South America" GROUP BY Continent'; Open; end;end;//也可以是 Havingprocedure T 阅读全文

摘要：本文来自：万一本例效果图:代码文件:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, Grids, DBGrids, DB, ADODB;type TForm1 = class(TForm) DBGrid1: TDBGrid; DataSource1: TDataSource; ADODataSet1: TADODataSet; Panel1: TPanel; Button1: ... 阅读全文

摘要：本文来自：万一本例效果图:代码文件:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, Grids, DBGrids, DB, ADODB;type TForm1 = class(TForm) DBGrid1: TDBGrid; DataSource1: TDataSource; ADODataSet1: TADODataSet; Panel1: TPanel; Button1: ... 阅读全文

摘要：Order By Asc|Desc本例效果图:代码文件:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, Grids, DBGrids, DB, ADODB;type TForm1 = class(TForm) DBGrid1: TDBGrid; DataSource1: TDataSource; ADODataSet1: TADODataSet; Panel1: TPanel; ... 阅读全文

摘要：本文来自：万一Where 用来指定查询条件;Like 和 Not Like 来指定模糊条件;模糊条件中:_ 表示任一字符;% 表示任一字符串;[] 表示一个集合.本例效果图:代码文件:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, Grids, DBGrids, DB, ADODB;type TForm1 = class(TForm) DBGrid1: TDBGrid; DataSo.. 阅读全文

摘要：本文来自：万一//选择 country 表中的 Name 字段SELECT Name FROM country//选择 country 表中的 Name、Area 和 Population 字段SELECT Name,Area,Population FROM country{多个字段时, 字段名是用 "," 隔开的}本例效果图:代码文件:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, E 阅读全文

摘要：本文来自：万一//选择 country 表中的所有字段SELECT * FROM country{虽然 SQL 并不区分大小写, 但应习惯把关键字大写}本例效果图:代码文件:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, Grids, DBGrids, DB, ADODB;type TForm1 = class(TForm) Panel1: TPanel; Button1: TBut.. 阅读全文

摘要：本文来自：万一本例效果图:代码文件:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, Grids, DBGrids, DB, DBClient, StdCtrls, ExtCtrls;type TForm1 = class(TForm) Panel1: TPanel; Button1: TButton; Button2: TButton; ClientDataSet1: TClientDataSet; DataSour... 阅读全文

摘要：新建中间层：1.新建ActiveX中的Active Library工程2.新建Multitier中的Remote Data Module，为Module起个名Test。3.点击View->Type Library，在ITest接口下新建方法，在Parameters中添加输入和输出的参数。然后，更新->注册（在界面的菜单栏中），程序会自动生成ProjectName.dll。4.运行dcomcnfg命令，在COM+应用程序中新建‘空应用程序’。5.将dll拉入新建的COM+程序的‘组件’中。测试中间层：1.点击Project->Import Type Library，Add中间层 阅读全文