Delphi中数据网格DBGrid应用

娇娇HJWV

娇娇HJWV

2016-01-29 14:28

Delphi中数据网格DBGrid应用,Delphi中数据网格DBGrid应用
  一、DBGrid中的下拉列表

  在DBGrid网格中实现下拉列表,设置好DBGrid中该字段的PickList字符串列表、初始的序号值DropDownRows即可。以职工信息库中的籍贯字段(字符串类型)为例,具体设计步骤如下:

  1、在窗体上放置Table1、DataSource1、DBGrid1、DBNavigator1等控件对象,按下表设置各个对象的属性:

对象属性设定值Table1 DataBasesy1 TableName zgk.dbf //职工信息库 DataSource1 DataSet Table1 DbGrid1 DataSource DataSource1 DBNavigator1 DataSource Datasource1
  2、双击Table1

  在弹出的Form1.Table1窗口中,用右键弹出快捷菜单,单击AddFields菜单项;选择所有的字段后,按OK按钮。

  3、修改第2步新增字段的DisplayLabel属性。以Table1ZGBH字段为例,在ObjectInspector窗口中选择Table1ZGBH

  修改属性DisplayLabel=职工编号,其余字段类似。

  4、双击DBGrid1

  在弹出的Editing DBGrid1.Columns窗口中,单击AddallFields按钮,增加Table1的所有字段。

  5、在EditingDBGrid1.Columns窗口,选择jg这一行,切换到ObjectInspector窗口,修改它的PickList.Strings为“湖北枝江市、北京市、河南平顶山市、浙江德清市”

  6、在Form1.Oncreate事件中写 入语句:

   Table1.Open;

  7、F9运行,用鼠标点击某个记录的籍贯字段,右边即出现一个按钮,点击这个按钮,可出现一个下拉列表,包含第5步中输入的四行字符串,可用鼠标进行选择。当然也可以自行输入一个并不属下拉列表中的字符串。

  二、DBGrid中的查找字段

  所谓查找字段(LookUpField),即DBGrid 中的某个关键字段的数值来源于另外一个数据库的相应字段。运用查找字段技术,不仅可以有效的避免输入错误,而且DBGrid的显示方式更为灵活,可以不显示关键字段,而显示源数据库中相对应的另外一个字段的数据。

  例如,我们在DBGrid中显示和编辑职工信息,包括职工编号、职工姓名、籍贯、所在单位编号,而单位编号来源于另一个数据库表格——单位库,称“单位编号”为关键字段。如果我们直接显示和编辑单位编号的话,将会面对1、2、3等非常不直观的数字,编辑时极易出错。但是如果显示和编辑的是单位库中对应的单位名称话,将非常直观。这就是DBGrid的所支持的查找字段带来的好处。

  实现DBGrid的查找字段同样不需要任何语句,具体设计步骤如下:

  1、在窗体上放置Table1、Table2、DataSource1、DBGrid1、DBNavigator1等控件对象,按下表设置各个对象的属性:

对象属性设定值Table1DataBasesy1TableName zgk.dbf //职工信息库 Table2 DataBasesy1TablenAME dwk.dbf //单位信息库 DataSource1DataSet Table1DbGrid1 DataSource DataSource1DBNavigator1DataSourceDatasource1
  2、双击Table1

  在弹出的Form1.Table1窗口中,用右键弹出快捷菜单,单击AddFields菜单项;选择所有的字段后,按OK按钮。

  3、修改第2步新增字段的DisplayLabel属性。以Table1ZGBH字段为例,在ObjectInspector窗口中选择Table1ZGBH

  修改属性DisplayLabel=职工编号,其余字段类似。

  4、设置Table1DWBH.Visible=False。

  5、在Form1.Table1窗口,用右键弹出快捷菜单,单击NewField菜单项,新增一个查找字段DWMC,在弹出的窗口设置相应的属性

  按OK按钮确认;在ObjectInspector窗口,设置Table1DWMC.DisplayLabel=单位名称。

  6、在Form1.Oncreate事件中写 入语句:

   Table1.Open;

  7、按F9运行,当光标移至某个记录的单位名称字段时,用鼠标点击该字段,即出现一个下拉列表,点击右边的下箭头,可在下拉列表中进行选择。在这里可以看出,下拉列表的内容来自于单位信息库,并
展开更多 50%)
分享

猜你喜欢

Delphi中数据网格DBGrid应用

Delphi
Delphi中数据网格DBGrid应用

Delphi中实现DBGrid列宽度自动调整

编程语言 网络编程
Delphi中实现DBGrid列宽度自动调整

s8lol主宰符文怎么配

英雄联盟 网络游戏
s8lol主宰符文怎么配

也谈为Delphi中数据库报表加网格

编程语言 网络编程
也谈为Delphi中数据库报表加网格

Delphi在网络数据库中的应用

Delphi
Delphi在网络数据库中的应用

lol偷钱流符文搭配推荐

英雄联盟 网络游戏
lol偷钱流符文搭配推荐

在Delphi的DBGrid中插入其他可视组件

编程语言 网络编程
在Delphi的DBGrid中插入其他可视组件

让Delphi的DBGrid支持鼠标轮

Delphi
让Delphi的DBGrid支持鼠标轮

lolAD刺客新符文搭配推荐

英雄联盟
lolAD刺客新符文搭配推荐

Flash MX 2004 ActionScript图文教程(十三)

Flash MX 2004 ActionScript图文教程(十三)

杏林同学录(四)

杏林同学录(四)
下拉加载更多内容 ↓