Ver Mensaje Individual
  #8  
Antiguo 12-12-2006
Avatar de AzidRain
[AzidRain] AzidRain is offline
Miembro Premium
 
Registrado: sep 2005
Ubicación: Córdoba, Veracruz, México
Posts: 2.914
Reputación: 21
AzidRain Va camino a la fama
Código Delphi [-]
DBEdit2.SetFocus;
DBEdit1.text:=1+query1.sql.Add('select max(idcliente)from clientes'); // Esto no va...
Código Delphi [-]
Query1.Clear;   //Limpiamos por si habia SQL guardado ahi
Query1.SQL.Add('select max(idcliente)+1 as sig_cliente from clientes');
Query1.Open;
DBEdit1.text:=  Query1.FieldByName('sig_cliente').AsString;
Query1.Close; // Cerramos el query pues ya no lo necesitamos.

Te recomiendo usar mejor un campo autoincrementado para guardar idcliente, de esta forma el motor de BD automáticamente irá aumentándo el número y nos ahorramos todo el código anterior.
__________________
AKA "El animalito" ||Cordobés a mucha honra||
Responder Con Cita