Obtener maximo valor de un campo en Access

[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.

[wilcg]

Empezado por 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.

Con todo los intentos que he realizado, parces tener razón. no encuentro la manera de solucionarlo, siempre me inventa un error este access, bueno seguiré investigando un poco mas, de lo contrario buscare otra solución.