Jump to content

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png click.png click.png

FastReport - Mudando a Impressora em tempo de execução


Go to solution Solved by FRANCISCO DE JESUS,
  • Este tópico foi criado há 138 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Prezados,

Preciso que o codigo mande a impressao para 2 impressoras em momentos diferentes: 1 quando for tirar preconta e outro quando for fazer pedido pra cozinha.

as impressoras estao compartilhadas assim: uma elgin i9 em outra maquina (com compartilhamento do windows) e um impressora de rede da bematech (4000th tcp/ip)

Meu Código:

Para Contas:

    frxComanda.PrintOptions.Printer := fdqConfigIMPRESSORA.AsString;
    frxComanda.PrepareReport;
    frxComanda.PrintOptions.ShowDialog := False;
    frxComanda.Print;

Para Cozinha:

 

    frxImpRemota.PrintOptions.Printer := fdqProdutosIMPRESSORAREMOTANOME.AsString;
    frxImpRemota.PrepareReport(True);
    frxImpRemota.PrintOptions.ShowDialog:= False;
    frxImpRemota.Print;

 

ele funciona para imprimir as contas na elgin porem se eu lancar para a cozinha, TODOS AS IMPRESSOES VAO PARA LA E NUNCA MAIS IMPRIME DA ELGIN.

O que estou fazendo de errado?

Obrigado a todos.,

 

 

Link to comment
Share on other sites

  • 1 year later...
  • Solution

ola, sei que esse post é de 2018, mas ai vai a solução:

se você fizer esse ajuste

  frxImpRemota.PrintOptions.Printer := fdqProdutosIMPRESSORAREMOTANOME.AsString;

    frxImpRemota.PrepareReport(True);

    frxImpRemota.PrintOptions.ShowDialog:= False;

    frxImpRemota.Print;

e depois carregar o arquivo,

frxImpRemota.LoadFromFile('report.fr3');

o fastreport zera a configuração para a padrão.

então primeiro carregue o arquivo, depois altere as configurações de impressão:

frxImpRemota.LoadFromFile('report.fr3');//carrega o arquivo antes de ajustar a impressao

frxImpRemota.PrintOptions.Printer := fdqProdutosIMPRESSORAREMOTANOME.AsString;

frxImpRemota.PrepareReport(True);

frxImpRemota.PrintOptions.ShowDialog:= False;

frxImpRemota.Print;

  • Like 2
Link to comment
Share on other sites

  • 1 year later...
  • Membros Pro
Em 20/08/2019 at 11:09, FRANCISCO DE JESUS disse:

ola, sei que esse post é de 2018, mas ai vai a solução:

se você fizer esse ajuste

  frxImpRemota.PrintOptions.Printer := fdqProdutosIMPRESSORAREMOTANOME.AsString;

    frxImpRemota.PrepareReport(True);

    frxImpRemota.PrintOptions.ShowDialog:= False;

    frxImpRemota.Print;

e depois carregar o arquivo,

frxImpRemota.LoadFromFile('report.fr3');

o fastreport zera a configuração para a padrão.

então primeiro carregue o arquivo, depois altere as configurações de impressão:

frxImpRemota.LoadFromFile('report.fr3');//carrega o arquivo antes de ajustar a impressao

frxImpRemota.PrintOptions.Printer := fdqProdutosIMPRESSORAREMOTANOME.AsString;

frxImpRemota.PrepareReport(True);

frxImpRemota.PrintOptions.ShowDialog:= False;

frxImpRemota.Print;

O tempo passou e voltei aqui no post pra lembrar se alguem tinha respondido. 

Obrigado meu amigo pela disposição em ajudar. Segui suas indicações e nao consegui existo.

Observando meu códido entendi que estava copiando o direcionamento junto, assim: RAW:TMT20. 

A Solução foi usar o Copy(fdqProdutosIMPRESSORAREMOTANOME.AsString,5);

Ai ele pegou a impressora: TMT20 e o relatorio passou a imprimir.

Obrigado!!!

 

  • Like 1
Link to comment
Share on other sites

  • 7 months later...
Em 20/08/2019 at 11:09, FRANCISCO DE JESUS disse:

ola, sei que esse post é de 2018, mas ai vai a solução:

se você fizer esse ajuste

  frxImpRemota.PrintOptions.Printer := fdqProdutosIMPRESSORAREMOTANOME.AsString;

    frxImpRemota.PrepareReport(True);

    frxImpRemota.PrintOptions.ShowDialog:= False;

    frxImpRemota.Print;

e depois carregar o arquivo,

frxImpRemota.LoadFromFile('report.fr3');

o fastreport zera a configuração para a padrão.

então primeiro carregue o arquivo, depois altere as configurações de impressão:

frxImpRemota.LoadFromFile('report.fr3');//carrega o arquivo antes de ajustar a impressao

frxImpRemota.PrintOptions.Printer := fdqProdutosIMPRESSORAREMOTANOME.AsString;

frxImpRemota.PrepareReport(True);

frxImpRemota.PrintOptions.ShowDialog:= False;

frxImpRemota.Print;

Me ajudou..rs obg

  • Like 1
Link to comment
Share on other sites

  • Este tópico foi criado há 138 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.