首页 > 编程语言 >Delphi 的 DBGrid 中的下拉列表和查找字段编程方法

Delphi 的 DBGrid 中的下拉列表和查找字段编程方法

时间:2023-07-27 23:22:21浏览次数:46  
标签:DBGrid Table1 Delphi 编程 列表 字段 查找 属性

数据网格是非常流行的数据输入和显示形式,像大家熟悉的Excel、VFP 中的功能强大的BROWS 等,为广大程序员乐于采用。在用 Delphi 开发数据库应用系统时,利用数据网格DBGrid 输入数据时,有些字段只允许某几个固定的字符串,像档案案卷的保管期限,只有“永久”、“长期”和“短期”三种,可否从一个下拉列表中进行选择,从而方便输入和避免输入错误呢?还有一些字段,例如职工信息库中的单位编号(在另外的单位库中保存着单位的详细信息),在输入和显示职工数据时,能否不对单位编号进行操作,而代之于更加直观的单位库中的单位名称呢?答案是肯定的,Delphi 的数据网格控件 DBGrid,支持下拉列表和查找字段的编程,而且,编程的过程都是可视化的,不需要写一行语句。 

一、DBGrid 中的下拉列表
    在 DBGrid 网格中实现下拉列表,设置好 DBGrid 中该字段的 PickList 字符串列表、初始的序号值 DropDownRows 即可。以职工信息库中的籍贯字段(字符串类型)为例,具体设计步骤如下: 
  1、在窗体上放置Table1、DataSource1、DBGrid1、DBNavigator1 等控件对象,按下表设置各个对象的属性: 
---------------------------------------
对象       属性         设定值
---------------------------------------
Table1       DataBase     sy1
Table        zgk.dbf   //职工信息库
DataSource1  DataSet      Table1
DbGrid1      DataSource   DataSource1
DBNavigator1 DataSource   Datasource1
-------------------------------------------
2、双击Table1, 在弹出的Form1.Table1 窗口中,用右键弹出快捷菜单,单击Add Fields 菜单项;选择所有的字段后,按OK 按钮。 
3、修改第2 步新增字段的 DisplayLabel 属性。以 Table1ZGBH 字段为例,在 Object Inspector 窗口中选择 Table1ZGBH, 修改属性 DisplayLabel= 职工编号,其余字段类似。 
4、双击 DBGrid1, 在弹出的 Editing DBGrid1.Columns 窗口中,单击 Add all Fields 按钮,增加Table1 的所有字段。 
5、在 Editing DBGrid1.Columns 窗口,选择 jg 这一行,切换到 Object Inspector 窗口,修改它的 PickList.Strings 为“湖北枝江市(换行)北京市(换行)河南平顶山市(换行)浙江德清市” 
6、在 Form1.Oncreate 事件中写入语句: 
Table1.Open; 
7、F9 运行,用鼠标点击某个记录的籍贯字段,右边即出现一个按钮,点击这个按钮,可出现一个下拉列表,包含第5 步中输入的四行字符串,可用鼠标进行选择。当然也可以自行输入一个并不属下拉列表中的字符串。 
二、DBGrid 中的查找字段
    所谓查找字段 (LookUp Field),即 DBGrid 中的某个关键字段的数值来源于另外一个数据库的相应字段。运用查找字段技术,不仅可以有效的避免输入错误,而且 DBGrid 的显示方式更为灵活,可以不显示关键字段,而显示源数据库中相对应的另外一个字段的数据。 
---- 例如,我们在 DBGrid 中显示和编辑职工信息,包括职工编号、职工姓名、籍贯、所在单位编号,而单位编号来源于另一个数据库表格——单位库,称“单位编号”为关键字段。如果我们直接显示和编辑单位编号的话,将会面对1、2、3 等非常不直观的数字,编辑时极易出错。但是如果显示和编辑的是单位库中对应的单位名称话,将非常直观。这就是DBGrid 的所支持的查找字段带来的好处。 
实现DBGrid 的查找字段同样不需要任何语句,具体设计步骤如下: 
  1、在窗体上放置 Table1、Table2、DataSource1、DBGrid1、DBNavigator1 等控件对象,按下表设置各个对象的属性: 
---------------------------------------
对象       属性         设定值
---------------------------------------
Table1       DataBase     sy1
Table        zgk.dbf   //职工信息库
Table2       DataBase     sy1
Table        dwk.dbf   //单位信息库
DataSource1  DataSet      Table1
DbGrid1      DataSource   DataSource1
DBNavigator1 DataSource   Datasource1
------------------------------------------
2、双击 Table1, 在弹出的 Form1.Table1 窗口中,用右键弹出快捷菜单,单击 Add Fields 菜单项;选择所有的字段后,按OK 按钮。 
3、修改第2 步新增字段的 DisplayLabel 属性。以 Table1ZGBH 字段为例,在 Object Inspector 窗口中选择 Table1ZGBH, 修改属性 DisplayLabel= 职工编号,其余字段类似。 
4、设置 Table1DWBH.Visible=False。 
5、在 Form1.Table1 窗口,用右键弹出快捷菜单,单击 New Field 菜单项,新增一个查找字段DWMC,在弹出的窗口设置相应的属性, 按 OK 按钮确认;在 Object Inspector 窗口,设置 Table1DWMC.DisplayLabel= 单位名称。 
6、在 Form1.Oncreate 事件中写入语句: 
Table1.Open; 
7、按 F9 运行,当光标移至某个记录的单位名称字段时,用鼠标点击该字段,即出现一个下拉列表,点击右边的下箭头,可在下拉列表中进行选择。在这里可以看出,下拉列表的内容来自于单位信息库,并且不能输入其他内容。 
三、DBGrid 中的下拉列表和查找字段的区别
    虽然 DBGrid 中的下拉列表和查找字段,都是以下拉列表的形式出现的,但两者有很大的差别。 
1、用 PickList 属性设置的下拉列表,它的数据是手工输入的,虽然也可以在程序中修改,但动态特性显然不如直接由另外数据库表格提取数据的查找字段。 
2、用 PickList 属性设置的下拉列表,允许输入不属于下拉列表中的数据,但查找字段中只能输入源数据库中关键字段中的数据,这样更能保证数据的完整性。 
3、用 PickList 属性设置的下拉列表设计较为简单。  

标签:DBGrid,Table1,Delphi,编程,列表,字段,查找,属性
From: https://www.cnblogs.com/crrc/p/17586401.html

相关文章

  • linux shell编程入门
    摘要介绍shell是什么shell快速开始一、基本概念1.shell是什么Shell是一个命令行解释器,它为用户提供了一个向Linux内核发送请求以便运行程序的界面系统级程序用户可以用Shell来启动、挂起、停止甚至是编写一些程序。2.shell脚本|执行方式脚本格式要求脚本以#!/b......
  • 23年暑假大一第一周编程练习
    23年暑假大一第一周编程练习1.消失的数字:deffind_missing_number(nums):#计算完整数组的和complete_sum=sum(range(1,len(nums)+2))#range包:[1,7)#print(complete_sum)#1+2+3+4+5+6=21#计算数组中所有数的和array_sum=sum(nums)......
  • Delphi中的Sender:TObject对象解析
     Delphi中的Sender:TObject1、Sender介绍Sender的类型是Tobject,是Tobject的派生类。Sender是一个TObject类型的参数,它告诉Delphi哪个控件接收这个事件并调用相应的处理过程。例如:procedureTForm1.Button1Click(Sender:TObject);begin//end;当点击BUTTON1时,会......
  • @Accessors注解——Lombok的链式编程
    用注解@Accessors 给实体类加上 chain=true 选项,即@Accessors(chain=true) 支持了Java链式写法; 什么是链式写法,比如:report.getOne().getTwo().getId(); 相关连接:https://susu-math.blog.csdn.net/article/details/122770688?spm=1001.2101.3001.6650.1&utm_me......
  • 网络编程面试
      TCP和UDP的区别TCP是面向连接的,传输前需要建立连接。UDP传输前不需要建立连接TCP仅支持一对一,UDP支持点对点,一对多,多对一TCP是面向字节流,UDP面向数据报TCP是可靠的,UDP是不可靠的TCP首部开销大于UDP,TCP首部开销最少20字节,UDP只需要8字节 TCP有三次握手机制和四次......
  • 6、编程基础-控制器编程
    控制器编程下页介绍如何编写控制器代码。尽管最初专注于C,但大多数相关和非语言特定的细节已被翻译成C++、Java、Python和MATLAB。要更深入地了解其他语言中的等效函数/方法,请检查节点和API函数以及C++/Java/Python。HelloWorld例子c语言#include<webots/robot.h>#include......
  • 并发编程-FutureTask解析
    1、FutureTask对象介绍Future对象大家都不陌生,是JDK1.5提供的接口,是用来以阻塞的方式获取线程异步执行完的结果。在Java中想要通过线程执行一个任务,离不开Runnable与Callable这两个接口。Runnable与Callable的区别在于,Runnable接口只有一个run方法,该方法用来执行逻辑,但是并没有......
  • 正点原子Ubuntu入门012---Linux C编程
    一、编写C语言程序Ubuntu中编写和编译是分开的,一般使用vim编辑器编写程序,或者使用vscode编写;使用gcc进行编译设置vim编辑器,一个Tab=4字节使用vi打开文件/etc/vim/vimrc,在此文件最后输入以下代码setts=4  设置vim编辑器,显示行号 测试案例:1#include......
  • Go语言网络编程示例
    1.简单示例以下是一个使用Go语言标准库net实现的简单的客户端和服务器端示例。服务器端监听本地的8080端口,并在接收到客户端连接后,向客户端发送一条欢迎消息。客户端通过Dial方法连接服务器,并接收服务器发送的欢迎消息。服务器端代码:packagemainimport("......
  • java RDM协议编程
    JavaRDM协议编程指南1.简介RDM(ReutersDataModel)是一种用于金融市场数据的标准化消息格式。在Java中,我们可以使用RDM协议来编写程序,实现金融市场数据的读取、解析和处理。本文将指导您如何使用Java编写RDM协议相关的代码。2.步骤下面是使用RDM协议编写Java程序的基本步骤:......