Mostrar el Número de CLiente en un Mantenimiento

[hondaalberto]

Buenas tardes DuilioIsola

Con el Código que me pusiste hice lo siguiente en el evento beforePost de la Tabla clientes:

Código Delphi [-]
begin
Query1.sql.add ( 'SELECT MAX(CLIENTE)+1 FROM CLIENTES');
Query1.Open;
TClientes.FieldByName('No').asinteger := Query1.FieldByName('MAX');

end;

y me devuelve el siguiente error:
[Error] UMantClientes.pas(254): Incompatible types: 'Integer' and 'TField'
[Fatal Error] RetailPos.dpr(18): Could not compile used unit 'UMantClientes.pas'