Impressão Direta p/ n° de Tabela
15/08/2003
0
Olá turma do Delphi
Estou com um projeto que está me enlouquecendo .....
Coloquei BITBTN para fazer impressão direta Pelo o numero de uma TABLE chamada RECIBO que está ligada a um QUERY + não consigo ..... Faze-la funcionar o + próximo que chequei foi o Exemplo a seguir só que imprime um formulário com “0” de informação .....
procedure TFRecibo.BitBtn1Click(Sender: TObject);
begin
if MessageDlg(´ Confirmar a Impressão?´, mtConfirmation, [mbYes,mbNo], 0)
= mrYes then
QuickREport2.Query1.Open;
QuickREport2.Print;
end;
Desde já Muito Obrigado
:cry:
Estou com um projeto que está me enlouquecendo .....
Coloquei BITBTN para fazer impressão direta Pelo o numero de uma TABLE chamada RECIBO que está ligada a um QUERY + não consigo ..... Faze-la funcionar o + próximo que chequei foi o Exemplo a seguir só que imprime um formulário com “0” de informação .....
procedure TFRecibo.BitBtn1Click(Sender: TObject);
begin
if MessageDlg(´ Confirmar a Impressão?´, mtConfirmation, [mbYes,mbNo], 0)
= mrYes then
QuickREport2.Query1.Open;
QuickREport2.Print;
end;
Desde já Muito Obrigado
:cry:
Rodrigo Abreu
Curtir tópico
+ 0
Responder
Clique aqui para fazer login e interagir na Comunidade :)