TDBGridEh表格 lookupParams 使用

最新推荐文章于 2025-04-19 00:17:59 发布

闪闪棉花糖

最新推荐文章于 2025-04-19 00:17:59 发布

阅读量523

点赞数

CC 4.0 BY-SA版权

分类专栏： delphi

本文链接：https://blog.youkuaiyun.com/hsqchdn/article/details/118076196

delphi 专栏收录该内容

39 篇文章

订阅专栏

本文介绍了如何通过设置TClientDataset的CommandText和TGrid的Columns属性，实现在表格中显示DepartmentID对应的部门名称，同时在下拉框中展示部门的Code和Department两个字段，避免了不必要的数据库关联操作。详细配置包括lookupParams、lookupDataset等关键设置，实现了高效的数据展示效果。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

客户的：cdsCustomer :TclientDataSet 的CommandText 为下的，中包含了DepartmentID 部门ID，这里不用关联
Department 表的DepartmentID字段
CommandText :='select top 10 CustomerID,Code,Customer,DepartmentID from Customer ';

客户显示的表格如下设置
Grideh1.columns[2].FieldName :='DepartmentID';  //部门名称
Grideh1.columns[2].Title.Caption :='所属部门';

Grideh1.columns[2].DropDownBox.autoFitColWidths :=False;
Grideh1.columns[2].DropDownBox.columns[0].FieldName :='Code';//部门编码
Grideh1.columns[2].DropDownBox.columns[0]。Title.Caption:='部门编码';

Grideh1.columns[2].DropDownBox.columns[1].FieldName :='Department';
Grideh1.columns[2].DropDownBox.columns[1]。Title.Caption:='部门名称';
//两列设置好列宽，把看自动适应列宽 去掉，设置一个固定的列宽 80 ,100
--以下重点设置
Grideh1.columns[2].lookupParams.KeyFieldNames :='DepartmentID';
Grideh1.columns[2].lookupDataset :=cdsDepartment;//TClientDataset 的 部门数据集
Grideh1.columns[2].lookupDisplayFieldName :='Department';
Grideh1.columns[2].lookupKeyFieldNames  :='DepartmentID';//这个视情况而定，这个应该是查询条件吧暂没测试
cdsDepartment.CommandText  :='select DepartmentID,Code,Department from Department ';

这样设置open 数据数据集即可显示 部门名称 ，这样做的意义在于，下拉可以显示多个字段，效果如果下图