用C＋＋Builder 建立数据库VCL使用经验

韩冰

<>  </P>
' J. X  K; C0 h- {<>杨超 </P>
3 Z: t( y, B( ^# k- \<>  </P>
' d9 v- a7 J# P! w- J& G<>　　随着数据库的广泛应用，数据库编程已经成为程序设计中发展迅猛的一支。 </P>
<>C＋＋ Builder在数据库开发方面具有的强大功能是无可比拟的，你甚至可以不 </P>
3 `6 n% B5 R4 q( ^5 ?, \<>写一行程序就生成漂亮的数据库程序。 </P>
<>  </P>
<>　　下面对C＋＋Builder中的几个数据库VCL的使用技巧做一下介绍： </P>
, ~% U) k, W+ _0 b) ?4 j  Q<>  </P>
<>　　一、DBGrid控件 </P>
<>  </P>
8 k9 O1 R0 T* s$ @<>　　1.设置DBGrid的字段显示宽度属性 </P>
# X/ J9 [7 V7 N! e: u! X" D- y<>  </P>
<>　　为了在DBGrid中建立较小的列，你必须建立一个显示标题，它等于或小于字 </P>
<>段值。例如，你希望建立一个只有三个字符宽的列，你的列标题显示必须只有三 </P>
<>个字符或更少。 </P>
<>  </P>
# ?2 \) ~  B/ ^! F. J& @; C# n  M<>　　2.改变DBGrid的显示字段及日期显示格式 </P>
<>  </P>
<>　　(1)双击DBGrid对应的Table1,进入字段编辑器。 </P>
: H/ o/ G2 }3 Z" E/ n<>  </P>
<>　　(2)点右键出现选单选“Add Fields…" ,出现添加字段对话框，选择要添加 </P>
+ e) E1 R1 U1 c<>的字段（该字段将在运行时由DBGrid显示）然后点OK按钮。 </P>
4 V( [5 M9 U" }% D! P+ g<>  </P>
" i/ x4 `) {' ^; k) Z# @<>　　(3)假设添加了“日期”字段，点该字段，在属性表中的：DisplayLabel中 </P>
" h* {& d1 l3 F1 r! W5 B) G; J% m<>填入你希望DBGrid显示的字段名。如果原来字段名是英文的，这里用中文名后 </P>
<>DBGrid将显示中文名。在DisplayFormat中填入：yyyy－mm－dd，以后日期将按 </P>
<>1999－05－28格式显示。 </P>
<>  </P>
. p% W' K: D" ?2 A. y<>　　二、Tquery控件 </P>
' @# l3 v# S9 H3 a<P>  </P>
<P>　　Tquery 控件是数据库编程中非常重要的一个控件，它负责通过BDE与数据库 </P>
<P>建立联系，通过SQL语句方便的建立查询。Query必须建立相应的SQL才能生效。 </P>
" B, C$ _' I+ h: B<P>  </P>
<P>  </P>
5 z0 C1 [0 N# x1 V( E1 F<P>　　Tquery的参数设置如下： </P>
1 t7 A" d. p* n2 z  e6 `( \<P>  </P>
<P>　　(1)在SQL属性中：Select ＊ from 表名 where 字段名=:变量名 </P>
1 }! v. s2 P8 z, \! J<P>  </P>
<P>　　跟在“ : "后面的是变量。这样写后，在参数属性中就可以修改该变量的数 </P>
<P>据类型等。 </P>
<P>  </P>
<P>　　(2)对变量的赋值： </P>
<P>  </P>
& I" h4 F4 S/ I/ w3 J6 @/ j<P>　　 Query1－〉Active=false; </P>
<P>  </P>
7 ^3 S& {* `1 Y+ o* w<P>　　 Query1－〉Params－〉Items[0]－〉AsString=Edit1－〉Text; </P>
/ q6 }6 V- |8 M/ ]& H/ j<P>  </P>
<P>　　 Query1－〉Active=true;//查找符合变量的记录 </P>
<P>  </P>
<P>　　(3)用DBGrid显示结果 </P>
" J8 z- S% N( l3 e- P$ A<P>  </P>
<P>　　DBGrid的DataSource与DataSource1连接，而DataSource1的DataSet与 </P>
<P>Tquery1 连接。 </P>
& ?8 n6 o/ l2 b- H2 l<P>  </P>
6 C" x: ?6 {1 s  |/ [# d# d<P>　　三、应用示例 </P>
<P>  </P>
$ S8 T  D, R+ n& I6 D<P>　　通过Query控件嵌入SQL语句建立的查询比Table更简单、更高效。 </P>
' b, `  g  `, F7 B% `<P>  </P>
+ b7 n& b/ P1 m( d; a' q<P>　　用一个简单的代码来说明如何建立查询程序： </P>
<P>  </P>
, g! K, a# e3 M0 z; C4 V! W<P>　　例如，要建立一个检索表1中书名为book1的程序则在表单上放置DBGrid, </P>
$ g( L9 E6 l& p$ O1 l0 _6 y<P>DataSource,Query三个控件加入以下代码： </P>
<P>  </P>
<P>　　DBGrid1－〉DataSource=DataSource1; </P>
<P>  </P>
<P>　　DataSource1－〉DataSet=Tqery1; </P>
; _' N! p. U6 U6 B* v. T<P>  </P>
! u5 \# i( z3 ^8 Y. f; v7 C- `<P>　　Query1－〉Close(); </P>
<P>  </P>
( ~" h' D  t) c<P>　　Query1－〉SQL－〉Clear(); </P>
<P>  </P>
<P>　　Query1－〉SQL－〉Add(″Select ＊ From 表 Where (书名=′book1′ ″ </P>
: R' s, {: [+ R& i<P>); </P>
* z: _% E% O" h% i; Z2 l<P>  </P>
/ W. J% G5 E, m( C: m0 `* v<P>　　Query1－〉ExecSQL(); </P>
<P>  </P>
<P>　　Query－〉Active=true; </P>
/ s* c. q) j5 w2 ^<P>  </P>
<P>　　你就可以在生成的表格中看到所有名称为book1的记录。 </P>