请教下:如何在TADOQuery产生的结果中搜索一定条件的数据?比如在里面找某个字段的最大值?
解决方案 »
- 查看一个进程所调用的所有文件路径列表!
- Delphi 调用VC编写的DLL问题返回直的问题
- 怎样判断读到了Excel或Word文件的最后?
- 我是新手,Delphi如何调用VC写的动态库中的函数?
- 使用dbexpress链接mysql的问题
- 一个头痛问题。
- 在一个程序中看到DiskId:=GetHDSerialNumber;,GetHDSerialNumber明显不是系统函数,但我怎么也找不到这个函数的声明和实现部分在哪里。
- 请教大家,有没有办法将BCB的源程序转换成DELPHI源程序,或者能在delphi下编译运行?谢谢了!
- 上海有delphi6了,哈哈.......特来一起分享!!
- 为什么当TTabControl控件获得焦点后,输入法无法切换出汉文,有没有解决的办法?急。。
- 诡异问题,希望高手帮忙解决
- delphi 调用WebService 时参数太多
select * from jh
where code=(select max(code) from jh)//利用迁入语句把最大的选择出来,再关联。就可。
select max(field1) from (select * from tablename where 条件) group by field1
1、将你的查询结果放到一个内存数据库中去,然后在将最大的值选择出来;2、利用三方控件,好像是cxGrid吧(不好意思,记不太清了),这个控件自己带这种操作,类似于Excel的检索
以下方法可以查找最大值,同时定位到该记录。
adsData 是 TADODataSet对象。
大概代码如下:
var
recNo: integer;
maxValue: double;
begin
adsData.DisableControls;
adsData.First;
maxValue := adsData.FieldByName(字段名称).AsFloat;
while not adsData.Eof do
begin
if maxValue<adsData.FieldByName(字段名称).AsFloat then
begin
recNo := adsData.RecNo;
maxValue := adsData.FieldByName(字段名称).AsFloat;
end;
adsData.Next;
end;
adsData.RecNo := RecNo;
adsData.EnableControls;
end;