Ir para conteúdo
Fórum Script Brasil
  • 0

Imprimir Clientes


lkm

Pergunta

7 respostass a esta questão

Posts Recomendados

  • 0

É que eu tenho um código assim:

procedure Tfm_imp_autor.BitBtn1Click(Sender: TObject);

var

busca : string;

begin

Busca := Edit1.Text + '*';

table1.Filter := 'razao_social =' + QuotedStr(Busca);

table1.Filtered := True;

fm_imp_aut.QuickRep1.Preview;

end;

quando eu faço a 1º consulta o quickreport recebe tudo direitinho mas quando eu fecho ao form e tento fazer ela novamente o quickreport aparece em branco.

O que eu faço para ele receber sempre os valores da consulta?

Link para o comentário
Compartilhar em outros sites

  • 0

É que eu tenho um código assim:

procedure Tfm_imp_autor.BitBtn1Click(Sender: TObject);

var

busca : string;

begin

  Busca := Edit1.Text + '*';

  table1.close;

  table1.open;

  table1.Filter := 'razao_social =' + QuotedStr(Busca);

  table1.Filtered := True;

  fm_imp_aut.QuickRep1.Preview;

end;

quando eu faço a 1º consulta o quickreport recebe tudo direitinho mas quando eu fecho ao form e tento fazer ela novamente o quickreport aparece em branco.

O que eu faço para ele receber sempre os valores da consulta?

Tente assim.....

Link para o comentário
Compartilhar em outros sites

  • 0

Porque que você não usa uma Query e comandos SQL pra fazer a consulta? Caso não saiba posta aí que agente te ajuda. tongue.gif

Link para o comentário
Compartilhar em outros sites

  • 0

Bem usando query eu acho mais fácil ...

você vai precisar do componente query, e de um edit para passar o campo que vai te retornar a consulta, geralmente é o código...

no evento onexit do edit, você pode fazer a consulta....

query.close;

query.sql.clear;

query.sql.add('select nome from cliente where cod_cliente = "' Edit1.text"' ');

query.open;

Darlan

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,3k
×
×
  • Criar Novo...