Club Delphi  
    Paypal   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
  #4  
Antiguo 05-08-2008
[coso] coso is offline
Miembro Premium
 
Registrado: may 2008
Ubicación: Girona
Posts: 1.678
Poder: 0
coso Va por buen camino
tambien puedes hacer, de la primera manera (por variables) mediante un bucle

Código Delphi [-]
var
   resultado : float;
   cn : TStringList;
   ml  : TStringList;
begin
   resultado := 0;
   cn := TStringList.Create;
   ml := TStringList.Create;
  
   cn.Add('--condicion 1 --'); //data = 01/01/1999, por ejemplo
   cn.Add('--condicion 2 --');
   ...
   cn.Add('--condicion n --');

   ml.Add(multiplicador1.Text);
   ml.Add(multiplicador2.text);
   ...
   ml.Add(multiplicadorn.text);

   resultado := 0;
   for i := 0 to cn.Count - 1 do
   begin
          q.Active := false;
          q.SQL.Text := 'select unidades * ' + ml[i] + ' as RESULTADO from tabla where ' + cn[i];
          q.Active := true;
          resultado := resultado + q.FieldByName('RESULTADO').Asfloat;
   end;
   ml.Free;
   cn.Free;
end;

venga espero q te sirva. Saludos.

Última edición por coso fecha: 05-08-2008 a las 14:46:05.
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

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Sql sumar campo sum() teclilla SQL 27 17-02-2008 19:50:15
Sumar un campo al ser checkeado en un ListView Avellas OOP 3 15-11-2007 22:39:50
Como sumar un campo entero y un real Maury Manosalva OOP 2 31-05-2007 20:41:14
Saber si un campo existe Fita Conexión con bases de datos 2 04-10-2005 20:10:10
Sumar un campo en dos tablas Ignacio SQL 2 27-09-2004 02:00:38


La franja horaria es GMT +2. Ahora son las 07:59:37.


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
Copyright 1996-2007 Club Delphi