Galera, com fazer uma consulta no quick reportno meu form inicial, no menu relatorio, tenho este cod[code:1:f34b321339]var cod:string;begin InputQuery(�Pesquisa�,�Digite o cod do produto�,cod); if ...

F�rum Query no QuickReport (consulta) #223283

30/03/2004

Galera, com fazer uma consulta no quick report
no meu form inicial, no menu relatorio, tenho este cod

var
  cod:string;
begin
  InputQuery(�Pesquisa�,�Digite o cod do produto�,cod);
  if cod=�� then
    ShowMessage(�Informe o codigo�)
  else
    begin
      if not DM.tabProduto.Locate(�cod�, cod,[loCaseInsensitive, loPartialKey]) then
        ShowMessage(�Produto n�o Cadastrado!�)
      else
        begin
          FormRelEst.cod:=cod;
          FormRelEst.QuickRep1.Preview
        end;
    end;

end;

e na query, no form relatorio, fa�o o comando basico
select * from table where table.cod=cod//esse sendo informado no formm inicial, so q � da o resultado, no form relatorio, tenho duas tabelas

testei isso no dbgrid, da certo, como fazer no quick, � precissa ser esta logica, so quero fazer uma listagem no query

Wolverine

Curtir t�pico

+ 0

Responder

Posts

30/03/2004

Wolverine

:cry:

Responder

Gostei + 0