没有找到合适的产品?
联系客服协助选型:023-68661681
提供3000多款全球软件/控件产品
针对软件研发的各个阶段提供专业培训与技术咨询
根据客户需求提供定制化的软件开发服务
全球知名设计软件,显著提升设计质量
打造以经营为中心,实现生产过程透明化管理
帮助企业合理产能分配,提高资源利用率
快速打造数字化生产线,实现全流程追溯
生产过程精准追溯,满足企业合规要求
以六西格玛为理论基础,实现产品质量全数字化管理
通过大屏电子看板,实现车间透明化管理
对设备进行全生命周期管理,提高设备综合利用率
实现设备数据的实时采集与监控
利用数字化技术提升油气勘探的效率和成功率
钻井计划优化、实时监控和风险评估
提供业务洞察与决策支持实现数据驱动决策
翻译|其它|编辑:郝浩|2004-02-08 13:04:00.000|阅读 1738 次
概述:
# 界面/图表报表/文档/IDE等千款热门软控件火热销售中 >>
DELPHI 的TDBGrid 控 件 主 要 用 来 处 理 数 据 表,它 的 属 性 中 有 一 个dgMultiSelect, 若 此 属 性 设
定 为TRUE, 则 可 以 选 中 多 个 记 录( 可 用CTRL + 鼠 标 左 键 选 择 多 个 记 录)。 对 选 中 的 多 个 记 录 可 以
有 以 下 几 种 处 理 方 式, 比 较 简 单 的 两 种 是: 清 除 所 有 的 选 择 记 录 可
用DBGrid1.SelectedRows.Clear 语 句; 删 除 所 有 的 选 择 记 录 可
用DBGrid1.SelectedRows.Delete 语 句。 但 如 果 想 获 得 选 中 的 所 有 记 录 的 其 他 信 息, 比 如, 在 单
独 的 一 个 窗 体 中 显 示 用 户 选 择 的 记 录 的 第 一 个 字 段 的 内 容( 如 所 有 选 择 的 姓 名) 如 何 处 理 呢 ?
这 就 要 使 用 书 签 功 能 了, 下 面 是 笔 者 编 写 的 一 个 程 序 中 的 过 程, 来 将 用 户 选 择 的 多 个 记
录 集 中 显 示 在 另 外 一 个 窗 体 中 ( 笔 者 使 用 的 是DELPHI4), 供 参 考 使
用。
procedure GetSelectedRecord
(DataSet : TDataSet; FieldName :
String;
BookmarkList : TBookmarkList; Strings :
Tstrings);
//这个过程中的参数分别为:数据表、字段名称、
书签、用来保存所选字段内容的
//字符串(用于将内容传递到另
一个单独窗体中的TLIST控件中)
var
I:
Integer;
bm : TBookMark;
begin
Strings.Clear;
with Dataset do
begin
DisableControls;
bm :=
GetBookMark;
try
//每个选择的记录都有一个书签标志,
这就为处理它们提供了条件
for I := 0 to
BookmarkList.Count - 1 do begin
Bookmark :=
BookmarkList[I];
Strings.Add(DataSet.FindField(fieldname).AsString);
end;
finally
GotoBookMark(bm);
FreeBookMark(bm);
EnableControls;
end;
end;
end;
调用举例:
GetSelectedRecord(Table1,
`NAME`, DBGrid1.SelectedRows,
Form2.ListBox1.Items);
本站文章除注明转载外,均为本站原创或翻译。欢迎任何形式的转载,但请务必注明出处、不得修改原文相关链接,如果存在内容上的异议请邮件反馈至chenjj@evget.com
面对“数字中国”建设和中国制造2025战略实施的机遇期,中车信息公司紧跟时代的步伐,以“集约化、专业化、标准化、精益化、一体化、平台化”为工作目标,大力推进信息服务、工业软件等核心产品及业务的发展。在慧都3D解决方案的实施下,清软英泰建成了多模型来源的综合轻量化显示平台、实现文件不失真的百倍压缩比、针对模型中的大模型文件,在展示平台上进行流畅展示,提升工作效率,优化了使用体验。
本站的模型资源均免费下载,登录后即可下载。模型仅供学习交流,勿做商业用途。
本站的模型资源均免费下载,登录后即可下载。模型仅供学习交流,勿做商业用途。
本站的模型资源均免费下载,登录后即可下载。模型仅供学习交流,勿做商业用途。
服务电话
重庆/ 023-68661681
华东/ 13452821722
华南/ 18100878085
华北/ 17347785263
客户支持
技术支持咨询服务
服务热线:400-700-1020
邮箱:sales@evget.com
关注我们
地址 : 重庆市九龙坡区火炬大道69号6幢
慧都科技 版权所有 Copyright 2003-
2025 渝ICP备12000582号-13 渝公网安备
50010702500608号