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

韩冰

<>  </P>
  B9 r9 t1 c0 E4 `! b, ?<>杨超 </P>
3 p/ y5 x3 F' y0 c* \; j/ y* Z<>  </P>
) k1 n, p; u, l$ U4 x- y, [<>　　随着数据库的广泛应用，数据库编程已经成为程序设计中发展迅猛的一支。 </P>
1 u! ~, H1 [0 f; K$ C8 I<>C＋＋ Builder在数据库开发方面具有的强大功能是无可比拟的，你甚至可以不 </P>
<>写一行程序就生成漂亮的数据库程序。 </P>
0 Q7 _- _1 I: G<>  </P>
<>　　下面对C＋＋Builder中的几个数据库VCL的使用技巧做一下介绍： </P>
<>  </P>
& j5 }5 G/ i; h. a9 N" a( Q* F<>　　一、DBGrid控件 </P>
9 B$ I2 }- R- x& }" }<>  </P>
<>　　1.设置DBGrid的字段显示宽度属性 </P>
<>  </P>
<>　　为了在DBGrid中建立较小的列，你必须建立一个显示标题，它等于或小于字 </P>
+ E$ E5 {7 I& b7 n4 J; E<>段值。例如，你希望建立一个只有三个字符宽的列，你的列标题显示必须只有三 </P>
<>个字符或更少。 </P>
<>  </P>
* x' [9 ~6 Y! u; M- E; e/ D<>　　2.改变DBGrid的显示字段及日期显示格式 </P>
<>  </P>
- x" E0 }. j) `1 Y9 L<>　　(1)双击DBGrid对应的Table1,进入字段编辑器。 </P>
, d1 H3 [7 v4 n* V5 [( J& T+ g  z<>  </P>
<>　　(2)点右键出现选单选“Add Fields…" ,出现添加字段对话框，选择要添加 </P>
<>的字段（该字段将在运行时由DBGrid显示）然后点OK按钮。 </P>
<>  </P>
<>　　(3)假设添加了“日期”字段，点该字段，在属性表中的：DisplayLabel中 </P>
<>填入你希望DBGrid显示的字段名。如果原来字段名是英文的，这里用中文名后 </P>
" V  Y5 Y( J" {. E! N4 w( W4 @<>DBGrid将显示中文名。在DisplayFormat中填入：yyyy－mm－dd，以后日期将按 </P>
<>1999－05－28格式显示。 </P>
<>  </P>
<>　　二、Tquery控件 </P>
/ D$ i8 E- E; U: L3 n8 k0 ~1 S/ h<P>  </P>
<P>　　Tquery 控件是数据库编程中非常重要的一个控件，它负责通过BDE与数据库 </P>
<P>建立联系，通过SQL语句方便的建立查询。Query必须建立相应的SQL才能生效。 </P>
<P>  </P>
; c2 s8 i4 x# M+ {<P>  </P>
<P>　　Tquery的参数设置如下： </P>
% T* P- U+ i: q9 i  S( Q9 x<P>  </P>
<P>　　(1)在SQL属性中：Select ＊ from 表名 where 字段名=:变量名 </P>
<P>  </P>
: |1 }4 u( r! u3 D3 Q<P>　　跟在“ : "后面的是变量。这样写后，在参数属性中就可以修改该变量的数 </P>
<P>据类型等。 </P>
3 B% d. Q% n& D5 ?( H* e- P* P, T<P>  </P>
<P>　　(2)对变量的赋值： </P>
<P>  </P>
0 o" v, a7 v1 U0 v3 Y<P>　　 Query1－〉Active=false; </P>
. \# C! E+ E0 f<P>  </P>
, }+ {& R# ^" ?# O7 ^" W4 F/ v<P>　　 Query1－〉Params－〉Items[0]－〉AsString=Edit1－〉Text; </P>
7 y5 q8 d7 p8 I<P>  </P>
2 d- y7 J6 k3 n# @6 ?<P>　　 Query1－〉Active=true;//查找符合变量的记录 </P>
: M6 M3 P* `$ b: d8 V0 x% i<P>  </P>
<P>　　(3)用DBGrid显示结果 </P>
, x& u+ D0 X1 W. _6 W) C" o<P>  </P>
' Z5 `; E2 [1 W* B  Y<P>　　DBGrid的DataSource与DataSource1连接，而DataSource1的DataSet与 </P>
<P>Tquery1 连接。 </P>
<P>  </P>
<P>　　三、应用示例 </P>
<P>  </P>
* b* J. @# O2 r<P>　　通过Query控件嵌入SQL语句建立的查询比Table更简单、更高效。 </P>
' ?0 L: k( r1 M) F6 T7 q<P>  </P>
<P>　　用一个简单的代码来说明如何建立查询程序： </P>
$ f) \: d6 d! ~2 `+ |" H<P>  </P>
& m' O1 i" d$ k& [* B% V<P>　　例如，要建立一个检索表1中书名为book1的程序则在表单上放置DBGrid, </P>
<P>DataSource,Query三个控件加入以下代码： </P>
( J' {& T* S: m9 O<P>  </P>
<P>　　DBGrid1－〉DataSource=DataSource1; </P>
<P>  </P>
<P>　　DataSource1－〉DataSet=Tqery1; </P>
- b0 K% l* W5 u4 V: h; c+ `<P>  </P>
<P>　　Query1－〉Close(); </P>
7 a/ m; N2 f- q, z0 p9 B<P>  </P>
# n% T% Y) s$ W<P>　　Query1－〉SQL－〉Clear(); </P>
) N4 i3 g3 f, R6 |<P>  </P>
<P>　　Query1－〉SQL－〉Add(″Select ＊ From 表 Where (书名=′book1′ ″ </P>
$ `8 p  {+ G+ c! b<P>); </P>
<P>  </P>
<P>　　Query1－〉ExecSQL(); </P>
2 V+ J! h, K/ J/ C  E<P>  </P>
<P>　　Query－〉Active=true; </P>
& I: P# _: Y- ~1 `" B<P>  </P>
  M- n3 ^9 H# K. Q<P>　　你就可以在生成的表格中看到所有名称为book1的记录。 </P>