Foros Club Delphi - Almacenar resultado de un sql

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- SQL (https://www.clubdelphi.com/foros/forumdisplay.php?f=6)

- - Almacenar resultado de un sql (https://www.clubdelphi.com/foros/showthread.php?t=50418)

federico1

16-11-2007 22:48:33

Almacenar resultado de un sql

buenas tardes mi consulta esta dada ya que en el codigo de delphi tengo un sql

Código Delphi [-]
DMKIOSCO.QRTODASXDIA.SQL.Add ('SELECT SUM((precio_publico - precio_costo)* cantidad), SECTOR');
DMKIOSCO.QRTODASXDIA.SQL.Add('FROM VENTA');
DMKIOSCO.QRTODASXDIA.SQL.Add('WHERE FECHA between :vFechaDesde and :vFechaHasta and (sector = "GOLOSINAS" OR sector = "CIGARRILLOS")');
DMKIOSCO.QRTODASXDIA.SQL.Add('GROUP BY SECTOR');
DMKIOSCO.QRTODASXDIA.Params[0].AsDatetime := vFechaDesde;
DMKIOSCO.QRTODASXDIA.Params[1].AsDatetime := vFechaHasta;
DMKIOSCO.QRTODASXDIA.Active := TRUE;

quiero pasar el resultado del select a un QRDBTEXT o QRLABEL y no se como hacerlo

Alguien me podria dar una mano.

Caral

16-11-2007 23:40:22

Hola
Y no seria algo como esto?

Código Delphi [-]Qreport1.QRDBTEXT:= DMKIOSCO.QRTODASXDIA.Parambyname(TuCampo).Value;

No se.
Saludos

ContraVeneno

17-11-2007 00:55:46

Código Delphi [-]with DMKIOSCO.QRTODASXDIA do begin
 IF Active then Close;
 SQL.Clear;
 SQL.Add ('SELECT SUM((precio_publico  - precio_costo)* cantidad) as Cantidad,SECTOR');
 SQL.Add('FROM VENTA');
 SQL.Add('WHERE FECHA between :vFechaDesde and :vFechaHasta');
 SQL.Add('and (sector = "GOLOSINAS" OR sector = "CIGARRILLOS")');
 SQL.Add('GROUP BY SECTOR');
 Params[0].AsDatetime   := vFechaDesde;
 Params[1].AsDatetime   := vFechaHasta;
 Open;
 UnValidateEdit.AsCurrency := FieldByName('Cantidad').AsCurrency; 
 //O tambien:
 UnEdit.AsString := FieldByName('cantidad').AsString;

 ...
end;  //with

Lepe	17-11-2007 14:16:21

¿Por qué un QRLabel o QRDBText?

Esos componentes son de QuickReports, para realizar un informe (impreso en papel).

Si quieres poner el resultado en un Form, debes usar un DBEdit.

Aclara ese detalle porque no tiene que ver una cosa con otra.

Edito: Tiene toda la pinta de ser un QuickReport.

Añades el QRDBText a la banda que corresponde, Establece sus propiedades:
Dataset el QRTODASXDIA
Field (solo te dejará elegir el campo suma)

La consulta de sql, la puedes establecer en tiempo de diseño en el QRTODASXDIA.sql y así solo tienes que pasarle las fechas y abrir la consulta, no es necesario usar sql.Add

Saludos

federico1

17-11-2007 15:02:30

gracias gente anduvo de 10

La franja horaria es GMT +2. Ahora son las 17:20:22.