Relatorio Acess Query Qreport

Delphi

06/04/2004

Awe pessoal fmz? jah tinha criado o topico ate tinham respondido(nao com a solucao) mais nao sei pq o topico evaporo. entao to postando denovo pq to precisando disso.

Tipo eu to com um probleminha
Eu tenho uma tabela clientes com os seguintes campos
Codigo
Nome
Convenio
Data

E eu quero que num form o cara digite duas datas(que tao em dois edits diferentes) e ai eu mostre o relatorio com todos os dados qeu tem entre as datas que o usuario colocou

So que o problema esta aqui:
Eu to usando ado pq to usando acess, E to usando Qreport tb pq eh oque eu sei.
E o problema esta em associa os QRDBText aos campos da tabela.
Pq como to usando uma query nao tem como eu faze isso entende?

E to fazendo assim:

procedure TFrmRelatorio.QuickRep1AfterPreview(Sender: TObject);
begin
with ADOQuery1 do
begin
close;
SQL.Clear;
SQL.Add(´SELECT Clientes.Codigo,Clientes.Nome,Clientes.Convenio,Clientes.Data FROM Clientes WHERE Data > :PL AND Data < :PA´);
Parameters.ParamByName(´PL´).Value := FrmPesq.MaskEdit1.text;
Parameters.ParamByName(´PA´).Value := FrmPesq.MaskEdit2.text;
Open;
end;
QRDBText1.DataField := ADOQuery1.Fields[0].FieldName;
QRDBText2.DataField := ADOQuery1.Fields[1].FieldName;
QRDBText3.DataField := ADOQuery1.Fields[2].FieldName;
QRDBText4.DataField := ADOQuery1.Fields[3].FieldName;
end;

Pra ve se funcionava mais nao aparece nada

E ai alguem sabe uma solucao pra isso?
Um cara nao lembro o nick falo pra eu faze de uma maneira mais nao deu certo sera que ng sabe? preciso mt disso


Snipa

Snipa

Curtidas 0

Respostas

Snipa

Snipa

06/04/2004

Sobe
Ae pessoal da uma ajudinha ae :)


GOSTEI 0
Phsm

Phsm

06/04/2004

Esta confuso, ligue os campos da query direto no relatório, altere a opcao de displayformat do campo de data da query p./ dd/mm/yy.
Mas afinal, o que acontece ?? não mostra nada ou somente os campos de data ??


GOSTEI 0
Snipa

Snipa

06/04/2004

Nao mostra nenhum dado
o recordcount eh 0

sendo que existe dados

E nao tem como eu liga direto no relatorio com uma query (pelo menos que eu saiba se tive me fala ae)
:)


GOSTEI 0
POSTAR