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 27-04-2004
fabriciof fabriciof is offline
Miembro
 
Registrado: abr 2004
Posts: 26
Poder: 0
fabriciof Va por buen camino
almacenar consulta en variable

hola , quisiera pedirles por favor que me ayuden con el siguiente problema,necesito almacenar una consulta en una variable para tal fin relalice la consulta asi

with query1 do
begin
close;
sql.clear;
sql.add('select id fron gauges where gauge='la paz'');
open;
end;

el resultado de esta consulta quisiera almacenarlo en la variable F, realice varios intentos pero niguno me resulta.

gracias
Responder Con Cita
  #2  
Antiguo 27-04-2004
Avatar de marcoszorrilla
marcoszorrilla marcoszorrilla is offline
Capo
 
Registrado: may 2003
Ubicación: Cantabria - España
Posts: 11.221
Poder: 10
marcoszorrilla Va por buen camino
No tengo mucho tiempo así que te pego este código:
Código:
//Calcular el saldo de Cheques clientes pendientes de cobro
DmAniStd.QrLiquidez.Close;
DmAniStd.QrLiquidez.Sql.Clear;
DmAniStd.QrLiquidez.Sql.Add('Select Sum(EuroDebe) - Sum(EuroHaber) as Total
from Diario');
DmAniStd.QrLiquidez.Sql.Add('Where SUBCTA =''4310000''');
DmAniStd.QrLiquidez.Open;

lbCheqCli.Caption:=FormatFloat(',0.00',DmAniStd.QrLiquidez.Fields[0].AsFloat);
nCheqCli:=DmAniStd.QrLiquidez.Fields[0].AsFloat;
Un Saludo.
__________________
Guía de Estilo de los Foros
Cita:
- Ça c'est la caisse. Le mouton que tu veux est dedans.
Responder Con Cita
  #3  
Antiguo 28-04-2004
Avatar de Al González
[Al González] Al González is offline
In .pas since 1991
 
Registrado: may 2003
Posts: 5.604
Poder: 29
Al González Es un diamante en brutoAl González Es un diamante en brutoAl González Es un diamante en brutoAl González Es un diamante en bruto
Smile

¡Buen día a todos!

Cita:
Empezado por fabriciof
...with query1 do
begin
close;
sql.clear;
sql.add('select id fron gauges where gauge='la paz'');
open;
end;
Después de la sentencia "Open;", la expresión Fields [0].Value tendrá el resultado de la consulta.
Código:
...
  Open;
  F := Fields [0].Value;
End;
¡Saludos!

Al González .
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


La franja horaria es GMT +2. Ahora son las 11:22:34.


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