SQL在Delphi数据库程序设计应用浅谈

核心提示： 学习Delphi有一个星期了，Delphi是Pascal的派生，SQL在Delphi数据库程序设计应用浅谈，可是说学过pascal到学起来很容易，当然我学过VB（visual basic），选中后感知组件就会显示你指定的姓名，这不是变的很方便了吗？当然在实际中也是必须的，当然相对来说比较熟悉这门语言，可是时间长了不学

 

学习Delphi有一个星期了，Delphi是Pascal的派生，可是说学过pascal到学起来很容易，当然我学过VB（visual basic），当然相对来说比较熟悉这门语言，可是时间长了不学也忘记了好多，但是学习Delphi上手快多了，尤其是我现在学的这本书是关于Delphi数据库设计，学习的过程中好多当年学VB时候那些捆绑数据库控件比如：ADO等都浮现在脑海中，所以学起来很轻松，但是设计到应用程序和语法还有待于进一步学习。

现在想谈谈学习SQL命令与ADOquery组件，SQL的Select语句以及动态执行SQL语句命令，这里SQL(Structrue Query Language)，是一种结构化查询语言，对我来说有这方面的基础，运用起来比较快。当然注意的是这里是通过ADOquery组件属性中ConnectiongString连接到相应的数据库的，在窗体中加入了三个组件：ADOquery、DataSource、DBGrid,当你拖一个DataSource组件时，它的名称是DataSource1把它的属性DataSet设置为ADOquery1；DBGrid1的属性DataSource设置为DataSource1,说到这里使我想起来程序组件与数据库之间的关系，也就是说为什么要拖这些组件，它们之间有什么样的一个解析关系呢？如下图所示

Table/ADOTable　　　　　  DataSource　　　　　　　  DBGrid.......

　　  连接组件------------->解析组件----------->感知组件

　　　　　　　　　　　　　　　　　 组件间的关系

说明一下：数据库程序设计里最重要的关键组件就是与数据库连接的Table组件（Ttable或TADOTable组件），这个数据库连接组件负责连接数据库文件中的表。我们要新增、删除、编辑、取用数据的操作也都必须通过此组件的相关方法、属性、事件，这里我们只要连接上就行了，其他的无需关心。当连接组件连接数据库文件中的表后，这个表的内容并无法连接组件直接交付给数据库感知组件（如DBGrid）显示出来，必须交由DataSource组件来解析表的内容，然后才将解析后的表的内容交付给数据库感知组件（如DBGrid）显示出来，也就是如上图所示的。当然感知组件也有DBNavigator这些都可以通过解析后显示数据，但具体的还要编写程序语句来完成。

说到这里我还是要继续进入SQL操作，这是最重要的，我个人认为。SQL的Select是很重要的，大家一定要参考一些数据库方面的书籍多看，最好是在上机的环境下调试。比如：改变字段名称这也是很重要的，一般我们在做项目的时候，数据库中的表的字段都是英文，但是在显示的时候为了让人们熟悉这就要以中文的形式显示一下了。象order by排序，Where条件筛选等都要很熟悉这些基本的操作。

接下来是动态执行SQL命令,这在实际中也是很重要的，比如说：一般我们会用ComboBox组件执行的时候来选择所需的字段，如某表中的姓名，选中后感知组件就会显示你指定的姓名，这不是变的很方便了吗？当然在实际中也是必须的。动态就这样产生了！在此提供在ComboBox组件的OnChange事件程序中的代码：

PRocedure TForm1.ComboBox1Change(Sender: TObject);

//申明装载sql命令的字符串变量

var

MySQL:string;

begin

//建立基本的SQL命令内容

mysql:='select * from 成绩单 order by ';

//取消数据库的连接

adoquery1.Close;或adoquery1.Active:=false；

 

//清除原本的sql命令

adoquery1.SQL.Clear;

//串接新的SQL命令

adoquery1.sql.Add(mysql+combobox1.Text);

//重新建立数据库连接

adoquery1.Open;

//将目前使用的SQL命令内容显示在标题栏中

caption:=adoquery1.SQL.Text;

//指定新的sql命令

//adoquery1.SQL.Add(combobox1.Text);

//以新的sql 命令连接数据库

adoquery1.Active:=true;

　  end;

end.

　 以上是我学SQL在Delphi的一些简单的应用，供大家参考！