Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Conexión con bases de datos
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Conexión con bases de datos

 
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 15-04-2004
agova agova is offline
Miembro
 
Registrado: may 2003
Posts: 69
Poder: 22
agova Va por buen camino
Angry campos calculados, hacen los que se les antoja¡¡¡

hola a todos
nesecito ayuda con los campos calculados, este es mi codigo:

procedure TFormInven.CInvenDiaCalcFields(DataSet: TDataSet);
begin
Inv:=Inv+CInvenDia.FieldByName('Venta').AsInteger+CInvenDia.FieldByName('Salidas').AsInteger+
CInvenDia.FieldByName('Entradas').AsInteger;
CInvenDia.FieldByName('Inventario').AsInteger:=Inv;
end;

donde la variable Inv es global de tipo longint, la primera vez lo calcula bien, el problema es cuando se llega al final o al inicio del dbgrid que es donde vuelve a calcular de nuevo la columna calculada Inventario y como inv ya no tiene el valor real calcula en base a otro numero, y esto no es todo la misma consulta la mando a un qreport y todoavia peor ya que aquí ni siquiera imprime los valores que estoy viendo en pantalla manda otros completamente distintos.

alguien podria decirme como hacerle para que no este recalculando los campos calculados cada que se le antoje, es decir, lo haga solo una vez, si no es posible como saber cuando se inicia el calculo para volver a iniciar el valor de inv.

NB. cabe mencionar que el valor de la variable inv es inicializado con el valor que me regresa otra consulta.

gracias por su atencon y se agradece cualquier sugerencia.
Responder Con Cita
 



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


La franja horaria es GMT +2. Ahora son las 03:16:19.


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