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

L2642730 2017-01-23 12:32:24

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

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

...全文

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

写回复

3 条回复

切换为时间正序

请发表友善的回复…

发表回复

赵4老师 2017-01-24

打赏
举报

回复

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

L2642730 2017-01-23

打赏
举报

回复

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

赵4老师 2017-01-23

打赏
举报

回复

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

{TDBLookupComboBox属性：DataField, DataSource, KeyField, ListSource。这几个属性代表的意义是：DataField, DataSource指定了需要修改的字段（就是用户改变了TDBLookupComboBox的值之后需要修改的字段），而KeyField, ListSource指定了TDBLookupComboBox的值...

TDBLookupComboBox主要用于关联其它表中的字段显示相关字段的内容，一般用于列表中。
如有以下两个表：主表，状态表
Create table main
(
iID int primary key,            --主键
username nvarchar(20),   --名字
userage int,                      --年龄
SexCode int

delphi7默认没有安装。需要手动安装。具体位置：delphi7/bin/dclsockets70.bpl。安装方法如下：Component->Install Packages->Add->/Bin/dclsockets70.bpl->OK经常有朋友提这样的问题，“我原来在delphi5或者delphi6中用的很熟的控件到哪里去了？是不是在delphi7中没有了呢？这是不是意味着我

unit Udblookupcombobox;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DB, StdCtrls, DBCtrls, ExtCtrls, Grids, DBGrids, DBTables;typ

经常有朋友提这样的问题，“我原来在delphi5或者delphi6中用的很熟的控件到哪里去了？是不是在delphi7中没有了呢？这是不是意味着我以前写的代码全都不能够移植到delphi7中来了呢？是不是我必须学习适应这些新的控件呢？”现在我就对这一问题进行解释，并对在delphi7中的VCL以及CLX进行一下总结，方便有这方面需求的朋友进行查询其实，我们在原来版本如D5、D6中使用的控件如

1,488

社区成员

23,270

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

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

+ 用AI写文章