1)sql.add('select max(cul) from '+dbtable); 2)result:=query.fieldbyname('cul').AsString;
1)sql.add('select max(cul) as cul from '+dbtable); 2)result:=query.fieldbyname('cul').AsString;
var st : stringst := 'select max(' + cul + ') from ' + dbtable; With Query1 do begin sql.clear; sql.add(st); open; end; Result := query1.fields[0].AsString;
2)result:=query.fieldbyname('cul').AsString;
2)result:=query.fieldbyname('cul').AsString;
With Query1 do begin
sql.clear;
sql.add(st);
open;
end;
Result := query1.fields[0].AsString;