能力值：
( LV2，RANK：10 )
|
-
-
2 楼
或者告诉我怎么查找这个字段的最大值,然后再＋1
|
能力值：
( LV2，RANK：10 )
|
-
-
3 楼
我这样做(dhk里面本身是5个数字1,2,3,4,5)：
aqbg.Close;
aqbg.SQL.Text:='Select max(dhk) from bg';
aqbg.Open;
MaxVal:=aqbg.Fields.Fields[0].AsString;
hh:=strtoint(MaxVal)+1;
为什么hh得不到值6？
|
能力值：
( LV2，RANK：10 )
|
-
-
4 楼
aqbg.SQL.Text:='Select dhk from bg Order By dhk desc';
查找出来的第一行肯定是最大值.
|
能力值：
( LV2，RANK：10 )
|
-
-
5 楼
谢谢楼上。
另外，我又用下面的代码求出：
procedure TForm1.Button1Click(Sender: TObject);
var
max_id:integer;
begin
aqbg.Close;
aqbg.sql.Clear;
aqbg.sql.text:='select max(dhk) as max_id from bg';
aqbg.open;
max_id:= aqbg.fieldbyname('max_id').asinteger;
max_id:=max_id+1;
DBEdit1.Text:=inttostr(max_id);
end;
=============================================
数据表bg的字段值dhk(1,2,3,4,5)
窗口框DBEdit1.Text显示为 6
成功结贴。
谢谢各位。
|
|
|
|
