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

韩冰

<>  </P>
<>杨超 </P>
<>  </P>
<>　　随着数据库的广泛应用，数据库编程已经成为程序设计中发展迅猛的一支。 </P>
<>C＋＋ Builder在数据库开发方面具有的强大功能是无可比拟的，你甚至可以不 </P>
<>写一行程序就生成漂亮的数据库程序。 </P>
$ B  P/ [; E7 m& I7 S( Y<>  </P>
<>　　下面对C＋＋Builder中的几个数据库VCL的使用技巧做一下介绍： </P>
<>  </P>
<>　　一、DBGrid控件 </P>
7 i3 g+ g. ^+ e. ~6 R* T4 c/ ?" w6 b: M! ]<>  </P>
- Z6 C3 l6 K/ b% y& v<>　　1.设置DBGrid的字段显示宽度属性 </P>
% Z6 R, c, x: s2 b- ~) R3 q% L6 a<>  </P>
1 _4 n- a* i* ~! ]8 l. t/ f* R<>　　为了在DBGrid中建立较小的列，你必须建立一个显示标题，它等于或小于字 </P>
6 }( E' z/ w, f% t) W8 @$ E<>段值。例如，你希望建立一个只有三个字符宽的列，你的列标题显示必须只有三 </P>
  K9 a( s! s. r5 `<>个字符或更少。 </P>
<>  </P>
) I  R% b7 d. L<>　　2.改变DBGrid的显示字段及日期显示格式 </P>
<>  </P>
9 U* m1 [. R6 w% w<>　　(1)双击DBGrid对应的Table1,进入字段编辑器。 </P>
# T0 }  y4 ?8 K/ C" A. v<>  </P>
<>　　(2)点右键出现选单选“Add Fields…" ,出现添加字段对话框，选择要添加 </P>
<>的字段（该字段将在运行时由DBGrid显示）然后点OK按钮。 </P>
5 r& z4 {5 k) `1 v5 {<>  </P>
6 e: Y+ j, Q4 ^8 m" L<>　　(3)假设添加了“日期”字段，点该字段，在属性表中的：DisplayLabel中 </P>
<>填入你希望DBGrid显示的字段名。如果原来字段名是英文的，这里用中文名后 </P>
<>DBGrid将显示中文名。在DisplayFormat中填入：yyyy－mm－dd，以后日期将按 </P>
<>1999－05－28格式显示。 </P>
<>  </P>
<>　　二、Tquery控件 </P>
<P>  </P>
( p( o5 I( C1 w0 ~) X& ^2 k<P>　　Tquery 控件是数据库编程中非常重要的一个控件，它负责通过BDE与数据库 </P>
<P>建立联系，通过SQL语句方便的建立查询。Query必须建立相应的SQL才能生效。 </P>
<P>  </P>
<P>  </P>
<P>　　Tquery的参数设置如下： </P>
4 [% I  _- k9 D8 c; q$ {<P>  </P>
<P>　　(1)在SQL属性中：Select ＊ from 表名 where 字段名=:变量名 </P>
<P>  </P>
: R0 k4 `' f# {" p% S  @<P>　　跟在“ : "后面的是变量。这样写后，在参数属性中就可以修改该变量的数 </P>
<P>据类型等。 </P>
<P>  </P>
( b) `- c0 }8 x6 V0 q3 ~9 z<P>　　(2)对变量的赋值： </P>
<P>  </P>
<P>　　 Query1－〉Active=false; </P>
<P>  </P>
<P>　　 Query1－〉Params－〉Items[0]－〉AsString=Edit1－〉Text; </P>
<P>  </P>
7 l% s: M# {6 L4 b  X<P>　　 Query1－〉Active=true;//查找符合变量的记录 </P>
<P>  </P>
1 _4 i; e) h3 ]1 m, l<P>　　(3)用DBGrid显示结果 </P>
<P>  </P>
<P>　　DBGrid的DataSource与DataSource1连接，而DataSource1的DataSet与 </P>
9 |) c5 B: i/ [<P>Tquery1 连接。 </P>
<P>  </P>
# l+ x4 `2 j8 O3 O" o# J+ @# A# h6 p<P>　　三、应用示例 </P>
<P>  </P>
2 `1 g  Q  Y/ c<P>　　通过Query控件嵌入SQL语句建立的查询比Table更简单、更高效。 </P>
<P>  </P>
<P>　　用一个简单的代码来说明如何建立查询程序： </P>
<P>  </P>
<P>　　例如，要建立一个检索表1中书名为book1的程序则在表单上放置DBGrid, </P>
5 z, c2 H2 d  v& X! P( r+ N<P>DataSource,Query三个控件加入以下代码： </P>
% k' F$ D8 `8 [2 x5 o8 A<P>  </P>
' L3 Z: p/ U$ Z<P>　　DBGrid1－〉DataSource=DataSource1; </P>
4 D. W  b; c1 C* S<P>  </P>
+ L' D; P" W+ w: s; S<P>　　DataSource1－〉DataSet=Tqery1; </P>
2 J$ _2 X7 u6 p1 L8 o0 a<P>  </P>
7 t9 P1 W! J1 r2 @8 T" O: o+ L<P>　　Query1－〉Close(); </P>
* O. E/ ^$ ~7 D  V4 V" r<P>  </P>
( N" h" T$ U9 ?9 y2 d; G<P>　　Query1－〉SQL－〉Clear(); </P>
9 N4 V" O4 ~1 g/ \: W. p<P>  </P>
* ?6 q. [: Z, x; ]. x: s" I, C<P>　　Query1－〉SQL－〉Add(″Select ＊ From 表 Where (书名=′book1′ ″ </P>
2 o$ h  O0 x6 d9 d$ x" F6 p<P>); </P>
, q) D" j- _, U" p<P>  </P>
5 {1 ?" q9 F9 l% @7 }3 j<P>　　Query1－〉ExecSQL(); </P>
<P>  </P>
<P>　　Query－〉Active=true; </P>
  U6 e& B5 A# C8 m  q<P>  </P>
8 K9 G* I& I+ M: Q* g<P>　　你就可以在生成的表格中看到所有名称为book1的记录。 </P>