ultimo registro

[edgar_prospero]

he logrado que me muestre el ultimo registro con el siguiente codigo

Código Delphi [-]
procedure TForm1.FormActivate(Sender: TObject);
begin
 query.Close;
     query.SQL.Text:='SELECT folio  FROM datos ORDER BY folio desc LIMIT 1';
     query.Open;
       folio.text := query.FieldByName('folio').asString ;

end;

pero lo que me falta lograr es aumentarle uno a ese ultimo registro por ejemplo si mi ultimo registro es el 26 que en el edit me muestre el 27 para empezar a guardar informacion ahi no se si me explique