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

韩冰

<>  </P>
  M, j2 W2 f! G) Q, I  a<>杨超 </P>
" E6 Q1 E* W- _8 z1 k5 S( x, [<>  </P>
<>　　随着数据库的广泛应用，数据库编程已经成为程序设计中发展迅猛的一支。 </P>
: ~9 w0 J, s; f& l<>C＋＋ Builder在数据库开发方面具有的强大功能是无可比拟的，你甚至可以不 </P>
1 H) w( f4 ]; b, T- N. r) e<>写一行程序就生成漂亮的数据库程序。 </P>
; K/ ~) O# c$ x, ~+ l: l6 _<>  </P>
<>　　下面对C＋＋Builder中的几个数据库VCL的使用技巧做一下介绍： </P>
<>  </P>
<>　　一、DBGrid控件 </P>
<>  </P>
/ ~7 P; K4 ~/ C<>　　1.设置DBGrid的字段显示宽度属性 </P>
; l9 z1 w! y) B$ e  l- d5 ?<>  </P>
<>　　为了在DBGrid中建立较小的列，你必须建立一个显示标题，它等于或小于字 </P>
5 l. K  h& ]! |1 O<>段值。例如，你希望建立一个只有三个字符宽的列，你的列标题显示必须只有三 </P>
<>个字符或更少。 </P>
<>  </P>
  C7 w+ c7 V7 t* l: e' a3 X<>　　2.改变DBGrid的显示字段及日期显示格式 </P>
<>  </P>
<>　　(1)双击DBGrid对应的Table1,进入字段编辑器。 </P>
<>  </P>
# }: ^2 f7 Z' w' Z. V2 z9 K# p<>　　(2)点右键出现选单选“Add Fields…" ,出现添加字段对话框，选择要添加 </P>
& @, Y+ {6 i) `$ [( r<>的字段（该字段将在运行时由DBGrid显示）然后点OK按钮。 </P>
1 e0 i7 x1 E  X: \6 s<>  </P>
* T6 ~, ^" u* S. O% a) R. p6 h<>　　(3)假设添加了“日期”字段，点该字段，在属性表中的：DisplayLabel中 </P>
6 g' J/ T: I1 M, v6 _<>填入你希望DBGrid显示的字段名。如果原来字段名是英文的，这里用中文名后 </P>
<>DBGrid将显示中文名。在DisplayFormat中填入：yyyy－mm－dd，以后日期将按 </P>
<>1999－05－28格式显示。 </P>
; H% n! q) i5 t<>  </P>
<>　　二、Tquery控件 </P>
2 L  z0 r# r. j& F' o& s( r2 i5 r) T<P>  </P>
2 ?3 w8 b0 S/ M5 g5 B<P>　　Tquery 控件是数据库编程中非常重要的一个控件，它负责通过BDE与数据库 </P>
<P>建立联系，通过SQL语句方便的建立查询。Query必须建立相应的SQL才能生效。 </P>
- y! S6 o% @/ O<P>  </P>
<P>  </P>
<P>　　Tquery的参数设置如下： </P>
<P>  </P>
% E7 Y% K/ W% N9 a<P>　　(1)在SQL属性中：Select ＊ from 表名 where 字段名=:变量名 </P>
<P>  </P>
<P>　　跟在“ : "后面的是变量。这样写后，在参数属性中就可以修改该变量的数 </P>
<P>据类型等。 </P>
<P>  </P>
1 h* T3 ^7 Y4 t9 {  G3 B, w  l<P>　　(2)对变量的赋值： </P>
<P>  </P>
) F' y6 h3 l0 [; c8 n) }8 F: L<P>　　 Query1－〉Active=false; </P>
/ |& e5 C7 H9 O1 g* t1 a<P>  </P>
1 c$ \3 z, ^8 W/ ^2 \5 I; r' A<P>　　 Query1－〉Params－〉Items[0]－〉AsString=Edit1－〉Text; </P>
! l5 Z' W1 |. u* I<P>  </P>
( M; P( Q$ j# |9 X  b4 Y2 ~<P>　　 Query1－〉Active=true;//查找符合变量的记录 </P>
<P>  </P>
<P>　　(3)用DBGrid显示结果 </P>
<P>  </P>
& Y/ O. R7 Y; \5 Z( Z* Z# p<P>　　DBGrid的DataSource与DataSource1连接，而DataSource1的DataSet与 </P>
; R5 ~: }- L1 K; g! n$ j<P>Tquery1 连接。 </P>
3 ]4 E3 z6 b5 d# v<P>  </P>
! s! u0 a# r( ?' Z. l% \* f+ h) l<P>　　三、应用示例 </P>
<P>  </P>
<P>　　通过Query控件嵌入SQL语句建立的查询比Table更简单、更高效。 </P>
<P>  </P>
<P>　　用一个简单的代码来说明如何建立查询程序： </P>
. J: I1 N- ]& G* b, {/ \<P>  </P>
, _# u( F- D  ~' \7 x<P>　　例如，要建立一个检索表1中书名为book1的程序则在表单上放置DBGrid, </P>
<P>DataSource,Query三个控件加入以下代码： </P>
' ^& K* ?  h0 e, i4 m1 k7 m<P>  </P>
<P>　　DBGrid1－〉DataSource=DataSource1; </P>
<P>  </P>
. f8 L8 _, w, A" e<P>　　DataSource1－〉DataSet=Tqery1; </P>
<P>  </P>
+ `! p% L2 G6 I# Z<P>　　Query1－〉Close(); </P>
<P>  </P>
  T+ s" _4 \) W+ t' \# K6 b<P>　　Query1－〉SQL－〉Clear(); </P>
<P>  </P>
( l7 ?) R% h0 Y) O6 C8 B, z& K' q$ i4 K<P>　　Query1－〉SQL－〉Add(″Select ＊ From 表 Where (书名=′book1′ ″ </P>
<P>); </P>
7 |# }' k" [; k<P>  </P>
<P>　　Query1－〉ExecSQL(); </P>
/ d9 {- k- S" Y; l+ a0 U<P>  </P>
<P>　　Query－〉Active=true; </P>
<P>  </P>
  }. \! v8 b# u; f<P>　　你就可以在生成的表格中看到所有名称为book1的记录。 </P>