Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Registro siguiente (https://www.clubdelphi.com/foros/showthread.php?t=70177)

agustin173 05-10-2010 00:24:35

Registro siguiente
 
Hola como estan todos

Quiero poner en un edit el registro siguiente me explico

estoy usando delphi 7, usando SQL Server y usando un adoquery

Tengo una Tabla llamada = Suplidor
un ADOQuery llamado = Adosuplidor
un Edit llamado = EDCodigo
Dentro de la Tabla tengo varios campos uno no ellos en (Codigo)

Lo que necesito es que en el edit me diga cual es el siguiente registro que se ra el codigo

Ejemplo: si digite el codigo 3 cuando grave me ponga que el proximo es el 4 y asi sucesivamente

yo se que es es con un recorcount pero no se como hacerlo prodrian ayudarme por favor.

Caral 05-10-2010 00:34:38

Hola
Agrega un ADOQuery adicional al form y llamalo QTemp, asi sabras que lo usas temporalmente.
Coloca este codigo donde necesites:
Código Delphi [-]
  QTemp.SQL.Text := 'Select Max(Codigo) From Suplidor';
  QTemp.Open;
  EDCodigo.Text  := IntToStr(QTemp.Fields[0].AsInteger+1);
  QTemp.Close;
Saludos

Caral 05-10-2010 00:47:08

Hola
Un recordCount te traera el dato de la suma de la cantidad de los registros, no necesariamente el numero del ultimo, pero:
Código Delphi [-]
EDCodigo.Text:= IntToStr(Adosuplidor.RecordCount);
Saludos

agustin173 05-10-2010 00:48:57

como estas amigo caral

voy aprobar te comento en unos intantes

agustin173 05-10-2010 00:54:29

Hermano Caral

Muchas Gracias me funciono bien gracias por la ayuda.

Graciaaaaaaaaaaaaaaaassssssssss


La franja horaria es GMT +2. Ahora son las 17:38:48.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi