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

韩冰

<>  </P>
0 s, g  F0 S8 M, T7 f+ I: z! _<>杨超 </P>
7 R. x; c" N% @; @<>  </P>
<>　　随着数据库的广泛应用，数据库编程已经成为程序设计中发展迅猛的一支。 </P>
<>C＋＋ Builder在数据库开发方面具有的强大功能是无可比拟的，你甚至可以不 </P>
% ^6 q4 T; O4 Q& c" r+ Y! `/ O1 X<>写一行程序就生成漂亮的数据库程序。 </P>
5 k) V2 H7 p2 M% E<>  </P>
) Y$ t2 e3 @7 q% ]! q( z+ N<>　　下面对C＋＋Builder中的几个数据库VCL的使用技巧做一下介绍： </P>
0 m$ m& v. f- j3 M. j* u<>  </P>
8 G1 ?$ L+ f) G# w8 g8 _2 j) g<>　　一、DBGrid控件 </P>
<>  </P>
<>　　1.设置DBGrid的字段显示宽度属性 </P>
<>  </P>
<>　　为了在DBGrid中建立较小的列，你必须建立一个显示标题，它等于或小于字 </P>
9 Z( m6 K8 n1 `<>段值。例如，你希望建立一个只有三个字符宽的列，你的列标题显示必须只有三 </P>
& J4 [+ l- o7 t* _5 B# Q5 k<>个字符或更少。 </P>
( S: j1 G7 ]) V<>  </P>
<>　　2.改变DBGrid的显示字段及日期显示格式 </P>
; S6 N) ]7 F) ?1 T<>  </P>
) K2 y) h, L+ {4 ^4 r9 Q5 `<>　　(1)双击DBGrid对应的Table1,进入字段编辑器。 </P>
6 O- t: l: [7 R* g5 ?, a<>  </P>
* e/ d: E" D' x' x/ L<>　　(2)点右键出现选单选“Add Fields…" ,出现添加字段对话框，选择要添加 </P>
<>的字段（该字段将在运行时由DBGrid显示）然后点OK按钮。 </P>
<>  </P>
+ m1 w0 N7 P3 c. \' Z: E, |6 q<>　　(3)假设添加了“日期”字段，点该字段，在属性表中的：DisplayLabel中 </P>
<>填入你希望DBGrid显示的字段名。如果原来字段名是英文的，这里用中文名后 </P>
<>DBGrid将显示中文名。在DisplayFormat中填入：yyyy－mm－dd，以后日期将按 </P>
<>1999－05－28格式显示。 </P>
<>  </P>
: o& i9 y) u4 d  r% \) e9 g' _1 l" @<>　　二、Tquery控件 </P>
& y8 ~2 B( j- z<P>  </P>
8 A. ]( u" ~' j<P>　　Tquery 控件是数据库编程中非常重要的一个控件，它负责通过BDE与数据库 </P>
<P>建立联系，通过SQL语句方便的建立查询。Query必须建立相应的SQL才能生效。 </P>
7 e3 ]9 R: v4 x' A: I/ y<P>  </P>
<P>  </P>
<P>　　Tquery的参数设置如下： </P>
- x- g* y; a+ M, G<P>  </P>
" N( T* p' L! c3 g9 Z" |! c+ N<P>　　(1)在SQL属性中：Select ＊ from 表名 where 字段名=:变量名 </P>
2 {/ Q" u6 b4 p9 D<P>  </P>
<P>　　跟在“ : "后面的是变量。这样写后，在参数属性中就可以修改该变量的数 </P>
<P>据类型等。 </P>
* l( ~' T  _+ a# z9 T<P>  </P>
<P>　　(2)对变量的赋值： </P>
1 F: o! j) [% L<P>  </P>
<P>　　 Query1－〉Active=false; </P>
<P>  </P>
<P>　　 Query1－〉Params－〉Items[0]－〉AsString=Edit1－〉Text; </P>
<P>  </P>
' y* _0 S! S* E6 u; ?& u  _<P>　　 Query1－〉Active=true;//查找符合变量的记录 </P>
& a3 P3 k' O1 P8 W1 J5 \, p<P>  </P>
# n; J' R' V6 y! Q" p! @) n<P>　　(3)用DBGrid显示结果 </P>
<P>  </P>
<P>　　DBGrid的DataSource与DataSource1连接，而DataSource1的DataSet与 </P>
<P>Tquery1 连接。 </P>
, `7 P; @! j9 U; p/ s: U<P>  </P>
% R2 M8 `6 W+ p/ r( g<P>　　三、应用示例 </P>
' t, j4 f+ K0 C8 s/ d, X3 y<P>  </P>
) Z$ O6 T/ x" a) R# O% n8 P% ~" A<P>　　通过Query控件嵌入SQL语句建立的查询比Table更简单、更高效。 </P>
<P>  </P>
( \/ r3 ?8 ]; A8 G<P>　　用一个简单的代码来说明如何建立查询程序： </P>
<P>  </P>
<P>　　例如，要建立一个检索表1中书名为book1的程序则在表单上放置DBGrid, </P>
3 e9 U" p. L# M9 {& i$ p' i<P>DataSource,Query三个控件加入以下代码： </P>
, z) G) }5 U, H<P>  </P>
, ~: y  y6 B9 \. W: Q<P>　　DBGrid1－〉DataSource=DataSource1; </P>
# m* o8 U  ~4 G. _! x2 V' W1 h<P>  </P>
<P>　　DataSource1－〉DataSet=Tqery1; </P>
( r! A7 l& z: s& d( Y: u<P>  </P>
; I' ?' u+ N# G8 |2 A7 }# l1 v<P>　　Query1－〉Close(); </P>
<P>  </P>
# Y' K( ]; R; y1 k# n3 g<P>　　Query1－〉SQL－〉Clear(); </P>
2 u3 B2 R" _# T: X# K0 |<P>  </P>
<P>　　Query1－〉SQL－〉Add(″Select ＊ From 表 Where (书名=′book1′ ″ </P>
<P>); </P>
3 |! h/ d" x& [6 z% e<P>  </P>
<P>　　Query1－〉ExecSQL(); </P>
<P>  </P>
<P>　　Query－〉Active=true; </P>
" m" f! h( e2 u- T. \<P>  </P>
<P>　　你就可以在生成的表格中看到所有名称为book1的记录。 </P>