Caixa de Dialogo Emissão de CTe

[Luiz Carlos de Lima]

Boa tarde,

1) Ao migrar para o FastReport começou a aparecer uma caixa de diálogo "Printing page". O clientes começaram a reclamar, pois como a emissão do DACTE é feita direta na impressora padrão sem diálogo para escolha da print, voce vai fazendo a digitação sem se preocupar com a emissão. o problema é que esta caixinha fica atrapalhando e digitaçao do próximo.

2) Outro problema é que estou migrando para o XE6 e a caixa de diálogo com retorno de erro esta com tamanho reduzida e trunca o tamanho da chave como Ex. 124875454...8787852, ver anexo.

Agradeço se alguém puder ajudar.

[Luiz Carlos de Lima]

Favor desprezar o Item 2, que não é CTe.

[Juliomar Marchetti]

Bom dia

sua imagem não veio no post!

poderia anexar novamente ?

[Luiz Carlos de Lima]

Boa tarde Juliomar, se for em relação ao problema: 1) Ao migrar para o FastReport começou a aparecer uma caixa de diálogo "Printing page". O clientes começaram a reclamar, pois como a emissão do DACTE é feita direta na impressora padrão sem diálogo para escolha da print, voce vai fazendo a digitação sem se preocupar com a emissão. o problema é que esta caixinha fica atrapalhando e digitação do próximo. Segue anexo.

Grato pela atenção.

PrintPage.pdf

[Celso Marigo Junior]

Certifique-se que a propriedade abaixo está setada para False. 

ACBrCTe1.DACTe.MostrarStatus

 

[Juliomar Marchetti]

Exatamente. o Celso falou tudo.

[Luiz Carlos de Lima]

19 horas atrás, Celso disse:

Certifique-se que a propriedade abaixo está setada para False. 

ACBrCTe1.DACTe.MostrarStatus

 

Bom dia, Já foi configurado  >        ACBrCTeDacteFR.MostrarStatus  := False;

[ibmoreno]

Bom dia,

Realmente não está deixando de mostrar o status mesmo setando o valor para falso na propriedade "ACBrCTe1.DACTE.MostrarStatus" conforme informado. Rodei o  projeto exemplo localizado na pasta  "AcBr\Exemplos\ACBrDFe\ACBrCTe\Delphi DACTe FR" e nele adicionei as propriedade conforme  abaixo:

    ACBrCTe1.DACTE.MostrarStatus  := False;
    ACBrCTe1.DACTE.MostrarPreview := False;

e no cado do MostrarStatus não está funcionando.

Muito obrigado

 

[ibmoreno]

Boa Tarde, 

Analisando a UNIT ACBrCTeDACTEFR.pas o método ImprimirDACTE realmente  não está setando o valor da propriedade ACBrCTe1.DACTE.MostrarStatus, sendo assim sempre irá mostrar o status da  impressão. veja o trecho do código abaixo do arquivo referenciado:

procedure TACBrCTeDACTEFR.ImprimirDACTE(ACTE: TCTe);
begin
  if PrepareReport(ACTE) then
  begin
    frxReport.PrintOptions.Copies := NumCopias;
	  frxReport.PreviewOptions.AllowEdit := False;
    if MostrarPreview then
      frxReport.ShowPreparedReport
    else
    begin
      // frxReport.PrepareReport(false);
      if MostrarStatus then
        frxReport.PrintOptions.ShowDialog := True
      else
        frxReport.PrintOptions.ShowDialog := False;
      frxReport.PrintOptions.Printer      := Impressora;
      frxReport.Print;
    end;
  end;
end;

Deve adicionar a configuração do frxReport para não mostrar o status da impressão, frxReport.ShowProgress := False, ou seja: 

procedure TACBrCTeDACTEFR.ImprimirDACTE(ACTE: TCTe);
begin
  if PrepareReport(ACTE) then
  begin
    frxReport.PrintOptions.Copies := NumCopias;
	  frxReport.PreviewOptions.AllowEdit := False;
    if MostrarPreview then
      frxReport.ShowPreparedReport
    else
    begin
      // frxReport.PrepareReport(false);
      if MostrarStatus then
        frxReport.PrintOptions.ShowDialog := True
      else
        frxReport.PrintOptions.ShowDialog := False;
      frxReport.ShowProgress 			  := FMostrarStatus;
      frxReport.PrintOptions.Printer      := Impressora;
      frxReport.Print;
    end;
  end;
end;

 

Aguardo um contato.. 

Muito Obrigado, 

Ivan