Obtener maximo valor de un campo en Access

[Casimiro Noteví]

Empezado por wilcg

Pero en Access me da error

¿Y el error es... ?

[Neftali [Germán.Estévez]]

La consulrta en si no parece tener nada raro.
Tal y como te han comentado, ¿Te da error? ¿No funciona? ¿No da nada?... ?¿?¿?

[giulichajari]

Y cambiaste la fuente de datos del query? osea en vez de especificar la conexión mysql, debes conectar con access.

[wilcg]

Gracias por su interés, les comento la conexión es correcta para Access la aplicacion guarda y modifica los registros de la base de datos, el problema surge cuando realizo esta consulta. y con respecto al error es este.

[nicolas77]

Código Delphi [-]
with Query1 do
begin
  SQL.Clear;
  Close;
  SQL.Text := 'Select max(codigo) as Maximo from clientes';
  Open;
  Edit1.Text := FormatFloat('0000000', StrToFloat(FloatToStr(FieldByName('CODIGO').AsInteger +1)));
  Close;
  Active := False;
end;

esto se puede arreglar:

Código Delphi [-]
  Edit1.Text := FormatFloat('0000000', StrToFloat(FloatToStr(FieldByName('CODIGO').AsInteger +1)));

[giulichajari]

Si intentas generar el id podria ser:

Código Delphi [-]
Select last_insert_id() from clientes

y le sumas 1.

Lo que veo raro es que si seleccionas el codigo "as maximo", lo que muestras en el edit es(el field) "maximo"; o codigo, etc..

Y fijate utilizando:

Código Delphi [-]
ExecSQL;

[ozsWizzard]

Llámame loco, pero parece ser que en access no dejará, intuyo, usar como alias el nombre de un campo que tenga la tabla.