DBGridQuery组件及应用(上).docVIP

第八讲 DBGrid、Query组件及应用（上） DBGrid和Query组件是最常用的两个组件，在本讲中重点介绍一下。 一、DBGrid组件 DBGrid组件的常用属性介绍： 1．DataSource属性 指明数据源的名称，一般从DataSource组件获取数据。比如在窗体放置一个DataSource组件单击DBGrid组件的DataSource属性的输入框，就会有DataSource1可供选择。 2．DragMode属性 缺省值为dmManual，此情况下，在程序运行时，用户可用鼠标拖动网格中的列，改变它们的显示顺序，但在数据库中并没有改变存放顺序。当其值设定为dmAutometic时，用户无法用鼠标拖动各列改变它们的显示顺序。 3．Options属性 此属性是一个属性集合，主要用来控制网格显示界面，它前面有一个“+”，双击“+”可展开一系列的属性，这些都是布尔型属性。下面逐个介绍（以其值为True解释，False则相反）。 dgEditing——用户可以在网格中编辑、插入、删除记录。 dgAlwaysShowEdit——网格总是在编辑状态。也就是说用户不必按回车键或F2就可以直接编辑。 dgTitles——在网格的第一行显示字段名或标题。 dgIndicator——在网格的最左边显示一个黑箭头指示当前记录指针的位置，在插入状态变为“*”形式，在编辑状态为“I”形状。 dgColumnResize——允许通过拖动网格的垂直分隔线改变列的宽度（必是在标题区域的垂直分割线）。 dgCollines——在各列之间显示垂直分割线。 dgRowlines——在各行之间显示水平分割线。 dgTabs——用户可用Tab或Shift+Tab键在各字段之间移动。 dgRowSelect——用于选中整条记录。 ●注意：若选中此项，则dgEditing、dgAlwaysShowEdit都将自动变为False，它们是互斥的属性。 dgAlwaysShow Selection——始终在网格中显示提示条。 dgConfirmDelete——在网格中删除记录时弹出确认信息。 dgCancelOnExit——在退出网格时不将增加的新记录保存，这样可避免在数据库中出现空记录。 dgMultiSelect——一次选择多个记录进行操作（按Ctrol键进行选择），此时左边的指示箭头变成了“”形状，多个被选中的记录前被标记了黑点） 4 FixedColor属性 固定网格单元的颜色，一般是最上面的一行和最左边的一列，可选择的模式有多种。 DBGrid使用小技巧： 直接在DBGrid中录入数据时，录入完一个字段后需要用TAB键转入下一个字段，而我们通常的输入习惯是输入完毕按回车键，下面这段代码可实现用回车键代替TAB键，例子代码如下：首先把Form1的KeyPreview属性设为True，编写窗体的KeyPress事件代码， procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char); begin if key=#13 then if not (ActiveControl is TDbgrid) Then //不是DBGrid组件 Begin key:=#0; perform(WM_NEXTDLGCTL,0,0); end else if (ActiveControl is TDbgrid) Then //是Dbgrid组件 begin With TDbgrid(ActiveControl) Do if Selectedindex(FieldCount-1) then Selectedindex:=Selectedindex+1 else Selectedindex:=0; end; ? 二、Query组件 Query组件是一个数据集部件，和Table组件有很多相同的属性、事件、方法。Query组件实现了对SQL语言的支持，SQL语句通过Query组件传递到要访问的数据库的引擎中，由对应的数据库引擎执行SQL语句实现对数据库的操作。由于标准SQL语言不是针对某一种关系数据库而定，所以大部分数据库管理系统又在标准SQL基础上进行了扩充。因此，在不同的数据库系统之间移植SQL语句时必需了解要移植的SQL代码是标准的还是扩充的。 Query组件的常用属性： 1. Active属性和DataBaseName属性 Active属性在设计时设置为True,就可以立即进行SQL操作，相当于运行期间执行Query.Open方法。DataBaseName属性指定数据库名称或别名，参见Table。 2. SQL属性 SQL属性是一个TString对象，在这