cyberfan's blog

正其谊不谋其利,明其道不计其功

  IT博客 :: 首页 :: 新随笔 :: 联系 :: 聚合  :: 管理 ::
  15 随笔 :: 489 文章 :: 44 评论 :: 0 Trackbacks
学习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的一些简单的应用,供大家参考!



//清除原本的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的一些简单的应用,供大家参考!
posted on 2005-08-12 16:04 cyberfan 阅读(221) 评论(0)  编辑 收藏 引用 所属分类: delphi
只有注册用户登录后才能发表评论。