Delphi中数据网格DBGrid应用

2016-01-29 14:28 30 1 收藏

Delphi中数据网格DBGrid应用,Delphi中数据网格DBGrid应用

【 tulaoshi.com - Delphi 】

  一、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运行,当光标移至某个记录的单位名称字段时,用鼠标点击该字段,即出现一个下拉列表,点击右边的下箭头,可在下拉列表中进行选择。在这里可以看出,下拉列表的内容来自于单位信息库,并

来源:https://www.tulaoshi.com/n/20160129/1493394.html

延伸阅读
  Delphi 中 ScriptControl 的高级应用(二) 5 、 Delphi 中使用 JavaScript 的 Base64 的加解密算法    搜索 google : javascript base64 加密 就会找到很多 base64 加密的代码,以下就是本人搜索到的一段代码(以下代码版权归其
DELPHI中操作ACCESS数据库(建立.mdb文件,压缩数据库) 以下代码在WIN2K,D6,MDAC2.6下测试通过, 编译好的程序在WIN98第二版无ACCESS环境下运行成功. //声明连接字符串 Const SConnectionString = 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=%s;' +'Jet OLEDB:Database Password=%s;&#...
Delphi 是具可视化界面的面向对象编程语言,它以其功能强大、简便易用等诸多特性,深受编程人员的欢迎。Delphi 中提供了数据库引擎 BDE(Borland Database Engine),并内含众多的数据库调用构件,为编程人员开发客户/服务器应用程序提供了方便。通常情况下,利用 Delphi 开发数据库应用程序,可以使用TTable、TDataSource、TDBEdit、TDBNavi...
13.1 数据库系统概述 数据库系统为我们提供了一种把与我们的工作和生活紧密相关的信息集合在一起的方法,它还提供了在某个集中的地方存储和维护这些信息的方法。数据库系统主要由三大部分组成:数据库管理系统(DBMS:它是专门负责组织和管理数据信息的程序)、数据库应用程序(它使我们能够获取、显示和更新由DBMS存储的数据)、数...
Delphi中的Table控件(Component)和query控件都需要有一个DatabaseName属性。可以用DatabaseName属性来指定该控件所引用的数据表路径。有两种方法可以为属性DatabaseName设置路径:第一种方法是直接输入数据表所在路径,另一种方法是使用数据库别名(Alias)。在Delphi中数据库别名是在数据库引擎(BDE)中设定的,一个别名对应一个文件路...

经验教程

901

收藏

36
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部