求助，获取控件中的文本 TDBLookupComboBox

L2642730 2017-01-23 12:32:24

单位十几年前的程序（Delphi编写）现在没人维护了，最近服务器端改动后导致客户端界面中一类名为TDBLookupComboBox的控件中数据没有排序，有几百行。原来是排序后，用户选择最后几行最近的数据。数据结构是两列：编号，日期
服务器端没办法改了，客户端有什么办法恢复排序。

我想了个办法是通过API调用sendmessage
列表控件可以发送LB_FINDSTRING消息查找文本，这个办法行吗？当然最好是把所有行排序最好，谢谢

...全文

5149 3 打赏收藏转发到动态举报

写回复

3 条回复

切换为时间正序

请发表友善的回复…

发表回复

赵4老师 2017-01-24

打赏
举报

回复

找个反编译Delphi的软件反编译？

L2642730 2017-01-23

打赏
举报

回复

大师，我这是没办法，没源码的，只能剑走偏锋。

赵4老师 2017-01-23

打赏
举报

回复

获取对应Delphi源代码才是正道。

DELPHI7安装目录中，BIN文件夹里面的所有.bpl文件对应的控件列举

delphi 下拉菜单code

EhLib.VCL 9.5内部版本9.5.012专业版。 ---------------------------------------------- 该库包含Borland Delphi版本7、9的组件和类。 Developer Studio 2006，Delphi 2007，Embarcadero RAD Studio 2009-XE10.3，Lazarus。目录 ----------------- 总览安装库安装帮助示范节目注册和价格其他资讯关于作者从哪儿开始。 ------------------- 从主要的Demo项目开始概述库。\ Demos \ Bin \ MainDemo.Exe。（已编译的演示文件在该库的评估版中可用）如果您使用了库的早期版本，则可以阅读摘要的新功能和更改中的内容history-eng.html。此版本库中有关新功能的更多详细信息可以在文件中找到-关于EhLib 9.5 Eng.doc 要在IDE中安装该库的新版本，请使用安装程序。\ Installer \ EhLibInstaller.exe 如果安装时有任何问题，请写信给ehlib支持地址support@ehlib.com 您还可以按照以下说明在库IDE中手动安装文件第2章安装库安装后，请确保所有已安装组件的可操作性。为此，请打开IDE，编译并启动一个主要的演示项目。。\ Demos \ MainDemo \ Project1_XE2.dpr 阅读下一个文件，以获取有关使用库组件的完整说明：。\ Hlp \ ENG \“ EhLib-用户指南.doc” 在文件中阅读有关EhLib for Lazarus的信息-Lazarus \ readme.txt 总览 -------- 该库包含几个组件和对象。 TDBGridEh组件 TDBGridEh提供TDBGrid的所有功能并添加了一些新功能，如下所示：允许选择记录，列和矩形区域。可以对应于多个/所有列的特殊标题。能够显示总和/计数/其他字段值的页脚。自动调整列大小以将网格宽度设置为等于客户端宽度。能够更改行和标题的高度。允许自动中断单行长标题和数据行到多行。标题可以充当按钮，并可以选择显示排序标记。自动排序标记。能够用省略号截断长文本。查找列表可以显示几个字段。在查找字段中进行增量搜索。冻结的列。 DateTime选择器支持TDateField和TDateTimeField。允许根据字段值显示TImageList中的位图。允许隐藏和跟踪水平或垂直滚动条。允许隐藏列。允许显示冻结，页脚和数据行的3D框架。允许绘制备忘字段。多行就地编辑器。比例滚动与数据集的排序无关。自动显示布尔字段的复选框。允许显示其他类型字段的复选框。具有保存和还原布局的程序（可见列，列注册表或ini文件中的顺序，列宽，排序标记，行高）。允许显示提示（工具提示）以显示单元格中不适合的文本。允许将数据导出为Text，Csv，HTML，RTF，XLS和内部格式。允许从文本和内部格式导入数据。可以对各种数据集中的数据进行排序。可以过滤各种数据集中的数据。当DBGridEh连接到TMemTable类型的数据集时，它允许：在不移动活动记录的情况下查看所有数据。显示TMemTable记录的树型结构。在SubTitle过滤器的下拉列表中自动形成值列表。根据所选库伦创建分组记录。 TDBVertGridEh组件在“垂直方向”中显示数据集中的一条记录的组件。有一个特殊的列来显示字段标题可以像DBGridEh中一样自定义就地编辑器和单元格数据。 TDBLookupComboboxEh组件提供TDBLookupCombobox的所有功能并添加几个新功能如下：可以有平面样式。允许只将值分配给KeyValue属性显示文本属性。允许将值键入（分配）到数据列表中未包含的Text属性（样式= csDropDownEh）。允许将KeyValue和Text保持为互不影响的值。当KeyField，ListField，ListSource，DataField和DataSource生效属性为空。下拉列表可以：显示标题有上浆力，自动将宽度设置为列表字段DisplayWidth之和（宽度= -1），用户按下按键时自动掉线。编辑按钮可以：显示下拉，省略号或位图图像。有指定的宽度。还有其他事件：OnKeyValueChanged，OnButtonClick。 TDBSumList组件此组件用于总计一个记录中的记录的总数和数量。 TDataSet具有动态更改。组件保留TDBSum的列表对象，其中包含组操作的类型（goSum或goCount）和名称总和字段（无需goCount字段名称）。 TPrintDBGridEh组件 TPrintDBGridEh提供用于预览和预览的属性和例程。具有以下功能的TDBGridEh组件的打印：能够垂直扩展行，直到打印所有文本。缩放网格以使其适合页面宽度的能力。能够打印/预览网格标题。能够打印/预览页面标题和页面页脚指定当前页面，当前日期，当前时间和/或静态的宏文本。自动打印/预览TDBGridEh的选定区域不为空。能够在网格之前和之后打印/预览富文本。 TPreviewBox组件 TPreviewBox使您可以创建可自定义的运行时预览。 TPrinterPreview对象 TPrinterPreview允许您将可打印数据记录在缓冲区中以进行跟踪将它们输出到屏幕上并发送到打印机。TPrinterPreview具有所有功能，并且属性与TPrinter对象中的属性相同。您可以类似地使用TPrinterPreview对象 TPrinter的功能，除了一些细节。在TPrinter Printer.Canvas.Handle和 Printer.Handle相同，但在TPrinterPreview中PrinterPreview.Canvas.Handle 表示图元文件，其中的数据和PrinterPreview.Handle的内容相同代表Printer.Handle。这意味着您必须使用用于绘制操作的PrinterPreview.Canvas.Handle（DrawText，DrawTexteEx等）并在返回有关以下信息的函数中使用PrinterPreview.Handle 打印机功能（GetDeviceCaps等）。全局功能PrinterPreview 返回默认的PrinterPreview对象，并以默认预览形式显示数据。 TDBEditEh组件表示可以显示和编辑字段的单行或多行编辑控件在数据集中或可以用作非数据感知的编辑控件。 TDBDateTimeEditEh组件表示可以显示和编辑的单行日期或时间编辑控件数据集中的日期时间字段，或可用作非数据感知的编辑控件。 TDBComboBoxEh组件表示结合了编辑框的单行或多行编辑控件带有可滚动列表，并且可以显示和编辑数据集中的字段，或者可以用作非数据感知组合编辑控件。 TDBNumberEditEh组件表示可以显示和编辑数字的单行数字编辑控件数据集中的字段或可以用作非数据感知的编辑控件。 TPropStorageEh，TIniPropStorageManEh，TRegPropStorageManEh组件组件实现了在设置中存储组件属性的技术存储，如ini文件，注册表等。 TMemTableEh组件数据集，将数据保存在内存中。它可能考虑为记录。此外，它：支持一个特殊的接口，该接口允许DBGridEh组件查看所有数据而不移动活动记录。允许从TDataDriverEh对象（DataDriver属性）获取数据。允许卸载更改回DataDriver中，可操作或推迟（在 CachedUpdates属性的相关性）。允许在客户端上创建主/明细关系（过滤记录）或在外部源上（更新参数[Params]并需要数据从DataDriver）。允许一次（无动态支持）排序数据，包括计算和查找字段。允许在设计时创建和填充数据，并将数据保存在的dfm文件中形成。允许以树的方式进行记录。每条记录可以有一条记录元素分支和本身是其他父母记录的元素。组件TDBGridEh支持显示这些组件的树型结构记录。允许连接到其他TMemTableEh的内部阵列（通过 ExternalMemData属性）并使用其数据：排序，过滤，编辑。具有用于在列表的一列中请求所有唯一值列表的接口记录数组，忽略数据集的本地过滤器。TDBGridEh使用此属性，用于自动填充字幕的DropDownBox中的列表过滤单元。 TDataDriverEh组件执行两项任务：将数据传送到TMemTableEh。处理TMemTableEh的更改记录（将它们记录在其他数据集中，或调用事件以处理程序中的更改）。 TSQLDataDriverEh 具有四个TSQLCommandEh类型的对象的DataDriver：SelectCommand， DeleteCommand，InsertCommand，UpdateCommand，GetrecCommand。 TSQLDataDriverEh无法将查询传输到服务器，但会调用全局（对于应用程序）执行SQL必须编写的事件服务器上的表达式。 TBDEDataDriverEh，TIBXDataDriverEh，TDBXDataDriverEh和TADODataDriverEh组件。这些是SQLDataDrivers，可以使用以下命令将查询传递到服务器数据访问的相应驱动程序。 -------------------- 2.安装库 -------------------- -------------------- 2.1自动安装库 -------------------- 从“安装程序”文件夹中运行EhLibInstaller.exe程序以在以下位置安装EhLib Delphi / C ++ Builder IDE。该程序创建文件夹以保持EhLib二进制和其他重新整理的文件，将重新整理的文件复制到创建的文件夹，编译程序包，在IDE中注册程序包并编写重新格式化的路径在注册表中。如果您具有可执行的安装程序（例如，EhLibSetupD7Eval.exe）那么您只需要运行程序并遵循安装过程即可。自动设置将所有单元写入必要的目录，在IDE中安装软件包和帮助文件。 -------------------- 2.2手动安装库 ------------------- 按照以下说明从EhLib归档文件安装文件： - 2.2.1。对于RAD Studio XE2（Delphi）或更高版本： -------------------

很好用的EHLib包为TCustomerDBEditEh,TDBEditEh,TDBDateTimeEh,TDBComoboBoxEh,TDBNnumberEditEh、TDBLookUpComboBox增加TransParent，以使控件支持透明。修正TDBEditEh的PassChar不为空且排列方式非左对齐时乱码问题（可能不是BUG,也许是因本人修改PaintWindow引起的错误也不一定）。修改单元：DBCtrlsEh.pas,DBLookupEh.pas，修改标记://yy 透明。未解决问题：控件直接放在窗体上时，设置TransParent时透明有效，但在获得焦点，再退出时，放在窗体上的部分透明无效。

1,488

社区成员

23,276

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章