如题,请问各位大虾,如何实现,请给出代码,比较急,在线等,谢谢。我的代码如下:
with adoqryJLSJ do
begin
Close;
SQL.Clear;
SQL.Add('select max(DYA) from JLSJ');
Open;
end;
with adoqryJLSJ do
begin
Close;
SQL.Clear;
SQL.Add('select max(DYA) from JLSJ');
Open;
end;
with adoqryJLSJ do
begin
Close;
SQL.Clear;
SQL.Add('select max(DYA) as maxdya from JLSJ');
Open;
edit1.text:=fieldbyname(maxdya).asstring;
end;
begin
Close;
SQL.Clear;
SQL.Add('select max(DYA) as maxdya from JLSJ');
Open;
edit1.text:=fieldbyname('maxdya').asstring;//刚才忘记‘’。这里换 Edit1.Text :=Fields[0].AsString;也可以
end;