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

韩冰

<>  </P>
<>杨超 </P>
<>  </P>
<>　　随着数据库的广泛应用，数据库编程已经成为程序设计中发展迅猛的一支。 </P>
5 n* j3 {- E6 R<>C＋＋ Builder在数据库开发方面具有的强大功能是无可比拟的，你甚至可以不 </P>
: C3 ^  @, n) U9 I<>写一行程序就生成漂亮的数据库程序。 </P>
<>  </P>
<>　　下面对C＋＋Builder中的几个数据库VCL的使用技巧做一下介绍： </P>
<>  </P>
+ z8 E# `1 z. z( I9 p, v<>　　一、DBGrid控件 </P>
9 ]3 ~2 y$ O) E- U# R<>  </P>
: D; X/ |+ P* }& p1 S<>　　1.设置DBGrid的字段显示宽度属性 </P>
# D9 C3 J8 G/ _- F, `9 f<>  </P>
: C& o  ~: O2 ]% Q<>　　为了在DBGrid中建立较小的列，你必须建立一个显示标题，它等于或小于字 </P>
* f6 Z$ u, k: }9 R5 m<>段值。例如，你希望建立一个只有三个字符宽的列，你的列标题显示必须只有三 </P>
<>个字符或更少。 </P>
) Y; M7 g6 Q' h/ o' Y) K# a<>  </P>
<>　　2.改变DBGrid的显示字段及日期显示格式 </P>
5 C( b( _! T: v6 _: E( S<>  </P>
<>　　(1)双击DBGrid对应的Table1,进入字段编辑器。 </P>
& |, p! y) D- s) \! Y7 A6 p# T<>  </P>
/ n0 |( [* v$ z; ]# e4 g+ n<>　　(2)点右键出现选单选“Add Fields…" ,出现添加字段对话框，选择要添加 </P>
<>的字段（该字段将在运行时由DBGrid显示）然后点OK按钮。 </P>
" T# I  ?0 @: H<>  </P>
1 c+ K9 o4 @* J2 z<>　　(3)假设添加了“日期”字段，点该字段，在属性表中的：DisplayLabel中 </P>
<>填入你希望DBGrid显示的字段名。如果原来字段名是英文的，这里用中文名后 </P>
<>DBGrid将显示中文名。在DisplayFormat中填入：yyyy－mm－dd，以后日期将按 </P>
<>1999－05－28格式显示。 </P>
<>  </P>
/ C6 w1 y. ?' s! M) E' l<>　　二、Tquery控件 </P>
<P>  </P>
% y* T, g8 @. J<P>　　Tquery 控件是数据库编程中非常重要的一个控件，它负责通过BDE与数据库 </P>
<P>建立联系，通过SQL语句方便的建立查询。Query必须建立相应的SQL才能生效。 </P>
<P>  </P>
<P>  </P>
<P>　　Tquery的参数设置如下： </P>
<P>  </P>
8 G& S$ {  I- l; K0 F& N<P>　　(1)在SQL属性中：Select ＊ from 表名 where 字段名=:变量名 </P>
<P>  </P>
<P>　　跟在“ : "后面的是变量。这样写后，在参数属性中就可以修改该变量的数 </P>
/ e2 |4 |4 {. H1 n3 M<P>据类型等。 </P>
<P>  </P>
<P>　　(2)对变量的赋值： </P>
+ K; j. D4 c- a- [( g: O9 i<P>  </P>
<P>　　 Query1－〉Active=false; </P>
<P>  </P>
<P>　　 Query1－〉Params－〉Items[0]－〉AsString=Edit1－〉Text; </P>
) G8 A/ r, }0 d+ a7 V0 \<P>  </P>
% c! A$ e  M  J, {% }<P>　　 Query1－〉Active=true;//查找符合变量的记录 </P>
) B/ e$ _% L; v" S' ?9 j<P>  </P>
& D( ]) u' q5 G' `- e) ?$ [! g<P>　　(3)用DBGrid显示结果 </P>
<P>  </P>
<P>　　DBGrid的DataSource与DataSource1连接，而DataSource1的DataSet与 </P>
<P>Tquery1 连接。 </P>
( N6 F: {' F, Q; Q0 u$ c4 S<P>  </P>
" Q9 B0 x* m" t/ R  d<P>　　三、应用示例 </P>
( i, V1 {% b% f- h% y' q. H9 W* \<P>  </P>
8 |$ L, e( u* V2 B. u- W8 ?<P>　　通过Query控件嵌入SQL语句建立的查询比Table更简单、更高效。 </P>
1 p+ U8 w7 j' |- N. s. }<P>  </P>
<P>　　用一个简单的代码来说明如何建立查询程序： </P>
7 Y% N) @' |: \& w1 w+ S! L<P>  </P>
. i# Q! u1 T" T0 k9 Z<P>　　例如，要建立一个检索表1中书名为book1的程序则在表单上放置DBGrid, </P>
8 s4 d* |9 a2 T; O8 U" x& f<P>DataSource,Query三个控件加入以下代码： </P>
; u2 o4 U& o$ D6 d4 \4 S<P>  </P>
<P>　　DBGrid1－〉DataSource=DataSource1; </P>
<P>  </P>
<P>　　DataSource1－〉DataSet=Tqery1; </P>
<P>  </P>
<P>　　Query1－〉Close(); </P>
<P>  </P>
; i& u$ t0 ^7 J+ u( \7 @<P>　　Query1－〉SQL－〉Clear(); </P>
<P>  </P>
) @8 p* S' J# M6 D( ~- v  l  w, `<P>　　Query1－〉SQL－〉Add(″Select ＊ From 表 Where (书名=′book1′ ″ </P>
<P>); </P>
<P>  </P>
<P>　　Query1－〉ExecSQL(); </P>
3 m' H5 y5 }0 e<P>  </P>
<P>　　Query－〉Active=true; </P>
<P>  </P>
<P>　　你就可以在生成的表格中看到所有名称为book1的记录。 </P>