我想让查询值在TDBGRID中的第一列显示对数据行的排列顺序号,例如:序号 F1 F2 F3
1
2
3
4
1
2
3
4
解决方案 »
- tcoolbar的edgeborders的属性用来干嘛的?
- datetimepicker 问题(在线等!)
- 送分题,FastReport分组统计
- 一个菜鸟问题,处理数字的精确位数?
- 如何将输入日期之后的每日的收支数额以图表的形式显示出来(做的是收支统计,数据库是ACCESS图表用DBCHART)?多谢!!!
- delphi中close和Application.Terminate的区别是什么?
- 关于Clientdataset的问题,小弟在线等待!急急!
- 求助:VC 和 VB 里的 MSSCOM 串口控件,delphi 要下载哪一个啊?给个下载地址,好吗?谢谢!
- 在线等候:当我通过query对数据库表作delete操作时,如何知道最终删除了多少条纪录?
- 有关于ADOQurey组件的问题,哎,花了我好多时间啦! 帮忙!
- 菜鸟问题:如何查询用SQL SEVER做数据库中的数据?
- 谁有人事管理的源码高分求购学习!
1.定义变量
private
maxno:integer;
public
bmodified:boolean;
2.写函数
function max(const a,b:integer):integer;
begin
if a>b then
result:=a
else
result:=b;
end;
3 FormCreate 中加入
bmodified:=false;
while not adoq_rsinfo.eof do
begin
maxno:=max(maxno, adoq_rsinfo.fields[0].asinteger);
adoq_rsinfo.next;
end;
4。在你的添加按钮中加入
adoq_rsinfo.field[0].asinteger:=maxno+1;