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

韩冰

<>  </P>
6 O1 t9 K4 l7 {2 U8 [( B$ p" u<>杨超 </P>
; p. x  v+ k3 J, T9 a4 S<>  </P>
<>　　随着数据库的广泛应用，数据库编程已经成为程序设计中发展迅猛的一支。 </P>
<>C＋＋ Builder在数据库开发方面具有的强大功能是无可比拟的，你甚至可以不 </P>
<>写一行程序就生成漂亮的数据库程序。 </P>
<>  </P>
<>　　下面对C＋＋Builder中的几个数据库VCL的使用技巧做一下介绍： </P>
<>  </P>
4 Z3 P5 R. Y# z* g6 v+ o8 x<>　　一、DBGrid控件 </P>
2 W, s, F5 d! y3 U/ J; u9 c<>  </P>
<>　　1.设置DBGrid的字段显示宽度属性 </P>
% r7 v, Y3 N( [! `& X<>  </P>
<>　　为了在DBGrid中建立较小的列，你必须建立一个显示标题，它等于或小于字 </P>
<>段值。例如，你希望建立一个只有三个字符宽的列，你的列标题显示必须只有三 </P>
<>个字符或更少。 </P>
<>  </P>
<>　　2.改变DBGrid的显示字段及日期显示格式 </P>
<>  </P>
<>　　(1)双击DBGrid对应的Table1,进入字段编辑器。 </P>
<>  </P>
<>　　(2)点右键出现选单选“Add Fields…" ,出现添加字段对话框，选择要添加 </P>
<>的字段（该字段将在运行时由DBGrid显示）然后点OK按钮。 </P>
- _" p+ o# k9 q9 |# \<>  </P>
+ S! v, N8 a. B& {<>　　(3)假设添加了“日期”字段，点该字段，在属性表中的：DisplayLabel中 </P>
<>填入你希望DBGrid显示的字段名。如果原来字段名是英文的，这里用中文名后 </P>
<>DBGrid将显示中文名。在DisplayFormat中填入：yyyy－mm－dd，以后日期将按 </P>
<>1999－05－28格式显示。 </P>
<>  </P>
& F8 T( v) f6 _; i<>　　二、Tquery控件 </P>
- w1 F3 l3 ~: g3 e& B7 v<P>  </P>
<P>　　Tquery 控件是数据库编程中非常重要的一个控件，它负责通过BDE与数据库 </P>
4 ]6 b: L0 s& r, ~: X; G<P>建立联系，通过SQL语句方便的建立查询。Query必须建立相应的SQL才能生效。 </P>
<P>  </P>
7 Y2 c) i/ R+ Q6 S# Q7 E: l<P>  </P>
<P>　　Tquery的参数设置如下： </P>
<P>  </P>
/ ]' v% ?0 ^/ O0 ?2 h<P>　　(1)在SQL属性中：Select ＊ from 表名 where 字段名=:变量名 </P>
<P>  </P>
' c5 Y/ ^$ b9 O4 H) S<P>　　跟在“ : "后面的是变量。这样写后，在参数属性中就可以修改该变量的数 </P>
<P>据类型等。 </P>
1 n0 `# D, R4 [' U, r% \! M<P>  </P>
<P>　　(2)对变量的赋值： </P>
# x0 o4 h: r+ \9 e9 n<P>  </P>
<P>　　 Query1－〉Active=false; </P>
& a+ ]  b& M5 S8 H. o3 W<P>  </P>
<P>　　 Query1－〉Params－〉Items[0]－〉AsString=Edit1－〉Text; </P>
2 _/ o' w  c, ?& u<P>  </P>
<P>　　 Query1－〉Active=true;//查找符合变量的记录 </P>
& }9 [9 D6 X. @7 T' \3 [<P>  </P>
<P>　　(3)用DBGrid显示结果 </P>
3 ]; n' l5 [8 G/ G$ q. `! N<P>  </P>
3 s( W. ]/ A" N* c6 [  j<P>　　DBGrid的DataSource与DataSource1连接，而DataSource1的DataSet与 </P>
$ o. t, w  ?% F0 g- U$ i( k<P>Tquery1 连接。 </P>
<P>  </P>
<P>　　三、应用示例 </P>
<P>  </P>
0 d+ V! i' ?, D* s- ^<P>　　通过Query控件嵌入SQL语句建立的查询比Table更简单、更高效。 </P>
  @: t8 H, S" Y<P>  </P>
, b) D& X" h4 ]. ~$ }<P>　　用一个简单的代码来说明如何建立查询程序： </P>
<P>  </P>
4 Z4 W- [) h- `& h. S<P>　　例如，要建立一个检索表1中书名为book1的程序则在表单上放置DBGrid, </P>
& b) [& m0 l; e7 L<P>DataSource,Query三个控件加入以下代码： </P>
! r5 l, X3 z9 z/ S$ H<P>  </P>
<P>　　DBGrid1－〉DataSource=DataSource1; </P>
6 I1 e* ]& i: C3 C* h<P>  </P>
/ W' G4 o3 H4 J5 m2 U" x3 @8 R<P>　　DataSource1－〉DataSet=Tqery1; </P>
! C4 o+ U! r: {0 n/ @8 H<P>  </P>
+ E0 A  g  ^" `6 y+ g<P>　　Query1－〉Close(); </P>
1 F% k% u' ]1 K- N* d5 O% ?/ X) D<P>  </P>
+ j+ \6 _: q+ ]7 k8 j6 ^<P>　　Query1－〉SQL－〉Clear(); </P>
5 |5 [  n  e( f! Y<P>  </P>
8 p8 D" J6 K. j1 Z7 f' E/ c<P>　　Query1－〉SQL－〉Add(″Select ＊ From 表 Where (书名=′book1′ ″ </P>
<P>); </P>
<P>  </P>
0 [' c! u8 F. ]2 a& g. O1 [<P>　　Query1－〉ExecSQL(); </P>
<P>  </P>
<P>　　Query－〉Active=true; </P>
$ b+ L3 X4 O0 m) z( D- B: O4 n<P>  </P>
/ ~- j. F$ R6 j  t<P>　　你就可以在生成的表格中看到所有名称为book1的记录。 </P>