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

韩冰

<>  </P>
; s9 I1 {7 @; L" }% S$ G<>杨超 </P>
4 a( X- n+ a; ^9 w<>  </P>
<>　　随着数据库的广泛应用，数据库编程已经成为程序设计中发展迅猛的一支。 </P>
3 y& y2 C$ a7 U8 k. W7 J% D<>C＋＋ Builder在数据库开发方面具有的强大功能是无可比拟的，你甚至可以不 </P>
<>写一行程序就生成漂亮的数据库程序。 </P>
& `3 X* l5 K9 V4 n<>  </P>
<>　　下面对C＋＋Builder中的几个数据库VCL的使用技巧做一下介绍： </P>
<>  </P>
<>　　一、DBGrid控件 </P>
0 C1 {2 V1 C: F2 i1 ]& `<>  </P>
: G3 C: t& e) e# y. h<>　　1.设置DBGrid的字段显示宽度属性 </P>
8 z% [/ P# r0 z+ r9 k<>  </P>
4 w/ H4 u  q/ D6 |) F<>　　为了在DBGrid中建立较小的列，你必须建立一个显示标题，它等于或小于字 </P>
<>段值。例如，你希望建立一个只有三个字符宽的列，你的列标题显示必须只有三 </P>
<>个字符或更少。 </P>
<>  </P>
; H$ I7 a1 b0 C. t+ r5 R8 U<>　　2.改变DBGrid的显示字段及日期显示格式 </P>
; G" u( d3 |  V4 y' B6 [<>  </P>
, _! E- R9 v: F' Q<>　　(1)双击DBGrid对应的Table1,进入字段编辑器。 </P>
<>  </P>
# m) s/ S6 q0 H/ c8 _! j4 {; h<>　　(2)点右键出现选单选“Add Fields…" ,出现添加字段对话框，选择要添加 </P>
6 }2 I# s. y: U* e7 v0 {  K$ c0 E( o<>的字段（该字段将在运行时由DBGrid显示）然后点OK按钮。 </P>
7 a8 c/ h& ~- N* M<>  </P>
' B; B* }% r5 O- @6 j; b<>　　(3)假设添加了“日期”字段，点该字段，在属性表中的：DisplayLabel中 </P>
! ^/ p/ l6 E8 k# Z) n<>填入你希望DBGrid显示的字段名。如果原来字段名是英文的，这里用中文名后 </P>
3 f* U* d2 |* @$ u6 k/ V$ \<>DBGrid将显示中文名。在DisplayFormat中填入：yyyy－mm－dd，以后日期将按 </P>
: |( b  t! U$ X<>1999－05－28格式显示。 </P>
( T3 [) a7 R& A# L7 @<>  </P>
, j- }" }7 i2 x: L3 u) N<>　　二、Tquery控件 </P>
<P>  </P>
<P>　　Tquery 控件是数据库编程中非常重要的一个控件，它负责通过BDE与数据库 </P>
# G' m9 `& C8 g9 C$ o- [4 Q) W. M<P>建立联系，通过SQL语句方便的建立查询。Query必须建立相应的SQL才能生效。 </P>
3 Z' R; e+ a$ G: w5 ~% T& D<P>  </P>
5 L8 D: f2 a, f4 v. O; o7 Q<P>  </P>
9 [; e  U, q( N<P>　　Tquery的参数设置如下： </P>
/ l- z( T& I- _8 r# d1 |. t; ]<P>  </P>
<P>　　(1)在SQL属性中：Select ＊ from 表名 where 字段名=:变量名 </P>
<P>  </P>
6 v! }: E0 D) X) I& p2 V<P>　　跟在“ : "后面的是变量。这样写后，在参数属性中就可以修改该变量的数 </P>
: C4 R3 }7 s$ b- v<P>据类型等。 </P>
2 h" Z% j8 c7 v# U<P>  </P>
<P>　　(2)对变量的赋值： </P>
5 R* Q3 R, v8 |1 \) k- a+ P. H" {<P>  </P>
<P>　　 Query1－〉Active=false; </P>
7 h4 n4 c& V% r& X4 }7 d. J) x1 c<P>  </P>
<P>　　 Query1－〉Params－〉Items[0]－〉AsString=Edit1－〉Text; </P>
$ I8 }5 ~; n: Q8 V( c<P>  </P>
<P>　　 Query1－〉Active=true;//查找符合变量的记录 </P>
  l# V2 H8 s7 o5 v$ q<P>  </P>
<P>　　(3)用DBGrid显示结果 </P>
3 E6 p( M; q8 O6 v; S<P>  </P>
<P>　　DBGrid的DataSource与DataSource1连接，而DataSource1的DataSet与 </P>
) A' [1 ]- e( {<P>Tquery1 连接。 </P>
<P>  </P>
<P>　　三、应用示例 </P>
<P>  </P>
4 R: z. @" F1 [<P>　　通过Query控件嵌入SQL语句建立的查询比Table更简单、更高效。 </P>
<P>  </P>
<P>　　用一个简单的代码来说明如何建立查询程序： </P>
3 }: Z0 R! j8 a<P>  </P>
$ u- k" K3 V( R* y+ F<P>　　例如，要建立一个检索表1中书名为book1的程序则在表单上放置DBGrid, </P>
4 x; G' Q7 q7 R. {<P>DataSource,Query三个控件加入以下代码： </P>
<P>  </P>
) ^7 A0 }+ `# e<P>　　DBGrid1－〉DataSource=DataSource1; </P>
3 S" `" U7 Y% z( e6 g<P>  </P>
  b+ M+ a% r6 Y$ z7 F7 a% B<P>　　DataSource1－〉DataSet=Tqery1; </P>
. f+ o6 P, C7 F8 k0 ^2 `% h  M<P>  </P>
<P>　　Query1－〉Close(); </P>
, G0 a2 e) c) E$ n8 P<P>  </P>
1 P5 z5 n2 r; x2 x& |* S<P>　　Query1－〉SQL－〉Clear(); </P>
<P>  </P>
- c& l& m! D& S' y- c& n  H<P>　　Query1－〉SQL－〉Add(″Select ＊ From 表 Where (书名=′book1′ ″ </P>
6 o  Z9 `' @# y9 d3 ~( n5 g: l<P>); </P>
<P>  </P>
<P>　　Query1－〉ExecSQL(); </P>
<P>  </P>
4 f, w. [7 _; r8 V  l<P>　　Query－〉Active=true; </P>
& c$ f/ \1 z/ U<P>  </P>
! C2 y# s, O. r- F<P>　　你就可以在生成的表格中看到所有名称为book1的记录。 </P>