Fórum Imprimir registro atual em quick report #226550
16/04/2004
0
ola pessoal,
a situacao eh e seguinte, tenho uma tabela de laudos, e quando escolho um determinado laudo, pelo seu codigo, crio o formulario para impressao, oinde queria imprimir somente o registro selecionado na tabela.
quais bandas e vou utilizar, se coloco os campos numa banda detalhes, elas me mostram todos os registros, como fazer, entao
ah na parte de cima tenho uma title e uma pageheader pras inscricoes diversas.
desde jah agradeco
T+
a situacao eh e seguinte, tenho uma tabela de laudos, e quando escolho um determinado laudo, pelo seu codigo, crio o formulario para impressao, oinde queria imprimir somente o registro selecionado na tabela.
quais bandas e vou utilizar, se coloco os campos numa banda detalhes, elas me mostram todos os registros, como fazer, entao
ah na parte de cima tenho uma title e uma pageheader pras inscricoes diversas.
desde jah agradeco
T+
Julio Cezar
Curtir tópico
+ 0
Responder
Posts
16/04/2004
Welton
Bom não sei qual banco de dados vc está usando mas vou lhe mandar um exemplo com o banco de dados Paradox.
|No seu form de impressão
Coloque um com componente TQuery que se localiza na paleta BDE se for Delphi7 link sua propriedade DataBaseName em seu Alias
e link seus componentes que estavam lincados a Table nesta Query.
guarde o código do laudo selecionado em uma variável e no botão que chama o form de impressão digite o seguinte código:
With Query1 do
begin
Close;
Sql.Clear;
Sql.Add(´Select * From Nome da Tabela´);
Sql.Add(´Where Codigo=´);
Sql.Add(Variável Que Contenha o Código Selecionado);
Open;
end;
Qualque dúvida entre em contato : weltonmauro@yahoo.com.br
|No seu form de impressão
Coloque um com componente TQuery que se localiza na paleta BDE se for Delphi7 link sua propriedade DataBaseName em seu Alias
e link seus componentes que estavam lincados a Table nesta Query.
guarde o código do laudo selecionado em uma variável e no botão que chama o form de impressão digite o seguinte código:
With Query1 do
begin
Close;
Sql.Clear;
Sql.Add(´Select * From Nome da Tabela´);
Sql.Add(´Where Codigo=´);
Sql.Add(Variável Que Contenha o Código Selecionado);
Open;
end;
Qualque dúvida entre em contato : weltonmauro@yahoo.com.br
Responder
Gostei + 0
16/04/2004
Snipa
Eu to com um problema bem parecido senao igual
E aqui tah dando esse erro:
List index out of bounds(0)
Oque sera?
eu to usando acess e adoquery pra pesquisa
E aqui tah dando esse erro:
List index out of bounds(0)
Oque sera?
eu to usando acess e adoquery pra pesquisa
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)