Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   SQL (https://www.clubdelphi.com/foros/forumdisplay.php?f=6)
-   -   almacenar consulta en variable (https://www.clubdelphi.com/foros/showthread.php?t=9566)

fabriciof 27-04-2004 04:24:04

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

marcoszorrilla 27-04-2004 07:51:06

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.

Al González 28-04-2004 05:34:51

¡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 :).


La franja horaria es GMT +2. Ahora son las 13:17:16.

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