Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > SQL
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 17-10-2008
marcosmendozaa marcosmendozaa is offline
Miembro
 
Registrado: oct 2008
Posts: 15
Poder: 0
marcosmendozaa Va por buen camino
guardar en variable un count

que tal compañeros, mi duda es la siguiente:

tengo una tabla donde la llave primaria se incrementa de uno en uno automaticamente, entonces lo que hice fue lo siguiente:

crear una variable en 0 i despues ejecutar un query "select count(id) from mitabla" este query me regresa el numero de registros y asi al aumentarle uno puedo obtener el numero de id que sigue....
mi problema es que necesito guardar lo que me regresa el count en una variable para poder aser el aumento.... como le hago? mi codigo es algo asi:

VAR
x:integer;
begin
x:=0;


dm.Qidep.Active:=false;
dm.Qidep.SQL.Clear;
dm.Qidep.SQL.Add('select count(id_departamento) FROM departamentos');
dm.Qidep.ExecSQL;
dm.Qidep.Active:=false;
dm.Qidep.Active:=true;
x:=x+1; //SUMO 1 AL ULTIMO VALOR DE LA ID
edit1.Text:=inttostr(x);
except
showmessage('ERROR');

Última edición por marcosmendozaa fecha: 17-10-2008 a las 00:23:43.
Responder Con Cita
  #2  
Antiguo 17-10-2008
jorge82 jorge82 is offline
Baneado
 
Registrado: jun 2005
Ubicación: Mérida, Yucatán, México
Posts: 75
Poder: 19
jorge82 Va por buen camino
Hola marcosmendozaa bienvenido a ClubDelphi, como siempre, es conveniente que pases a dar una vuelta por aquí.

No aclaras que tecnología de bases de datos utilizas, pero creo que algo así te podría servir (lo digo de memoria):
Código Delphi [-]
var
  x: Integer;
begin
  ...
  with dm.Qidep do
  begin
    Close;
    SQL.Clear;
    SQL.Add('select count(id_departamento) from departamentos');
    Open;
    x := Fields[0].AsInteger;
    x := x+1;
  end;
end;
Responder Con Cita
  #3  
Antiguo 17-10-2008
marcosmendozaa marcosmendozaa is offline
Miembro
 
Registrado: oct 2008
Posts: 15
Poder: 0
marcosmendozaa Va por buen camino
gracias

woww! en menos d 1 hora la respuesta, que por cierto fue correcta, copie el codigo asi tal cual y me funciono exactamente como yo queria...gracias!
Responder Con Cita
  #4  
Antiguo 17-10-2008
[egostar] egostar is offline
Registrado
 
Registrado: feb 2006
Posts: 6.556
Poder: 25
egostar Va camino a la fama
Cita:
Empezado por marcosmendozaa Ver Mensaje
woww! en menos d 1 hora la respuesta, que por cierto fue correcta, copie el codigo asi tal cual y me funciono exactamente como yo queria...gracias!
Hola marcosmendozaa

Que bien que obtuviste la respuesta a tu problema rápidamente, aprovecho para darte la bienvenida e invitarte a que leas nuestra guia de estilo, tambien revisa como se postea el codigo, ves la diferencia entre lo que tu pones y lo que te puso jorge82, esas son etiquetas y puedes ver como se usan aquí y aquí.

Salud OS
__________________
"La forma de empezar es dejar de hablar y empezar a hacerlo." - Walt Disney
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Guardar una variable de javascript a delphi joel20 .NET 2 12-04-2006 12:54:19
Guardar valor en una variable... hademon SQL 1 14-09-2005 17:16:57
guardar en variable dato de un dbgrid el_barto Conexión con bases de datos 2 30-07-2005 14:41:04
Problemas al guardar desde DBGrid y variable... Phacko Conexión con bases de datos 0 22-03-2005 03:54:35
guardar en una variable Luli Varios 2 17-01-2005 02:30:07


La franja horaria es GMT +2. Ahora son las 18:01:12.


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