albert_costa

Impressão Do Dacte Erro DACTE QRCTe.Page.Continuous

53 posts in this topic

Oi Juliomar,
Fiz o seguinte.... desinstalei o Quick e instalei novamente..... fiz um novo updade no tortoise dos fontes do ACBR que eu havia alterado. Os abri novamente, cliquei em Ignore All, mexi nos forms e salvei. Fiz o build do projeto que usa os componentes e fiz o teste de impressão. O erro que citei parou de ocorrer, porém, ao imprimir, ele gerou o formulário em branco, como se eu não tivesse passado nada ao componente, mas foi passado. Como estou usando stream, fiz o teste gravando em arquivo (para ter certeza do conteúdo) e, mesmo lendo de um arquivo a impressão fica totalmente em branco. Não consegui entender o que estou fazendo de errado.
 
Segue abaixo o trecho de código que estou usando para imprimir:

 

procedure TmtiImprimirCTeACBr.ImprimirCTe(aCTeStream: TStringStream);
var

  vCTe : TACBrCTe;
begin
  vCTe := TACBrCTe.Create(Self);
  try
    try
      vCTe.DACTe := TACBrCTeDACTeQR.Create(vCTe);
      vCTe.DACTe.TipoDACTE := tiRetrato;
      vCTe.Conhecimentos.Clear;

      //vCTe.Conhecimentos.LoadFromStream(aCTeStream);

      vCTe.Conhecimentos.LoadFromFile('c:\teste.xml');

      vCTe.Conhecimentos.Imprimir;
    except
      on e : Exception do
      begin
        raise Exception.CreateFmt('Erro ao imprimir: %s', [e.Message]);
      end;
    end;
  finally
    vCTe.Free;
  end;
end;

 
Novamente, podem me dar uma mãozinha?

Share this post


Link to post
Share on other sites

eu estou usando QR3 e, mesmo substituindo os arquivos que estão na pasta DACTE_QR3 para a fontes/ACBrCTE, ainda ocorre o erro de page.continuous... alguma outra solução?

Share this post


Link to post
Share on other sites

Bom dia Luciano e Igor,

 

Luciano, você experimentou incluir os componentes no form em vez de cria-los da forma que você esta fazendo?

 

Igor, Quando você fez a última atualização?, Lhe pergunto isso, porque não existe mais a pasta DACTE_QR3 no lugar temos o arquivo:

Property_Does Not Exist.txt

 

Este arquivo contem um passo a passo de como resolver esse problema de propriedades inexistentes.

Share this post


Link to post
Share on other sites

Italo

 

Ja fiz a atualização hoje mesmo, mas aparenta estar com os mesmos arquivos, e ainda esta a pasta DACTE_QR3

Share this post


Link to post
Share on other sites

Italo

 

Ja fiz a atualização hoje mesmo, mas aparenta estar com os mesmos arquivos, e ainda esta a pasta DACTE_QR3

Você trocou o endereço do repositório ACBr da sua máquina?

Veja na minha assinatura como fazer.

Share this post


Link to post
Share on other sites

Fiz uma conta no sourceforge e tentei atualizar o link para o download dos novos codigos...

Mas toda vez que coloco o login da source forge no espaço indicado, ele pede a senha e, mesmo colocando a senha correta, o programa me diz que a senha está incorreta 

 

Obs.: Eu fiz a conta há 5 minutos...

Share this post


Link to post
Share on other sites

Regys

 

Perdão pela falha, não tinha notado isso...

 

Enfim, consegui fazer o download do novo codigo e achei esse txt. Executei os passos contidos nele e tbm dei Build no meu projeto, mas o erro persiste...

 

Atualmente uso Delphi 7 e a versão do QR é a 3.0.9

Share this post


Link to post
Share on other sites

Bom dia Igor,

 

Acredito que alguma coisa você não deve ter feito dos passos que constam no arquivo texto, pois eu resolvia o problema exatamente da forma que foi colocada.

 

De qualquer forma hoje a noite vou tentar fazer funcionar uma maquina que tenho em casa com o Delphi 7 e Quick Report 3.0 instalado e seguir o passo a passo para ver se não esta faltando nada.

Share this post


Link to post
Share on other sites

Bom dia Igor,

 

Ontem a noite liguei a maquina que tenho em casa com Delphi 7 e Quick Report 3.0 que estava desligada já a vários meses.

 

Atualizei todos os fontes dos componentes, reinstalei no Delphi.

 

Compilei uma aplicação que utiliza os componentes ACBrCTe e ACBrCTeDACTEQR, aplicação esta que permite carregar o XML e depois visualizar ou imprimir o DACTE.

 

Ao tentar imprimir apareceu o erro de propriedade inexistente.

 

Segui a risca os passos contidos no arquivo: Property_Does Not Exist.txt, compilei novamente a aplicação usando a opção Build. 

 

E ao tentar imprimir o DACTE o erro não apareceu, portanto problema resolvido.

 

Sendo assim, volto a afirmar, que se seguir a risca os passos você consegue resolver o problema de propriedades inexistentes.

Share this post


Link to post
Share on other sites

Italo, bom dia,

 

 

      Tentei fazer com o componente de tela, conforme você sugeriu, mas continuou mostrando o DACTe em branco.

 

 

      Tenho o costume de atualizar o repositório semanalmente, e não encontrei o arquivo Property_Does Not Exist.txt. Mas percebi que tenho o diretório DACTE_QR3. O que devo fazer? Excluir todo o repositório e baixar novamente?

 

       Preciso urgente deste arquivo para colocar o Dacte em produção logo.

 

Agradeço a paciência.

Share this post


Link to post
Share on other sites

Bom dia Luciano,

 

Por favor pesquise no fórum por Atualização forçada.

 

Houve uma alteração na URL ou seja o endereço do repositório, o endereço antigo ainda esta ativo, logo você consegue baixar, mas os fontes nele contido estão desatualizados.

 

Siga o passo a passo que encontra-se no post: Atualização Forçada para que você possa atualizar os fontes.

Share this post


Link to post
Share on other sites

Italo

 

Fiz de acordo com o que voce fez com sua maquina.

Reinstalei o Delphi 7 e o QR3 e os componentes que utilizo

e instalei também o componente o AcBR

e, mesmo depois de seguir a risca o que estava no .txt, continuou com o erro...

 

Alguma outra ideia?

Share this post


Link to post
Share on other sites

hehehe, eu fiz a mesma coisa Igor e o meu DActe continuou imprimindo em branco.... dae fiquei com vergonha de postar!!!!!

 

Mas estou com o mesmo problema. Fiz tudo conforme o Italo comentou, atualizando os componentes, reinstalando todos eles, procedendo da forma como o TXT manda (passo a passo) e continuou da mesma forma.

 

Também estou sem saber o que fazer.

Share this post


Link to post
Share on other sites

Boa noite a todos,

 

Por favor verifiquem se a propriedade Zoom é 100 em ambas as units:

 

ACBrCTeDACTeQR

ACBrCTeDACTeQRRetrato

Share this post


Link to post
Share on other sites

Bom dia Luciano,

 

Vou realizar um teste em casa, pois lá tenho duas maquinas, uma com o Quick Report versão 3.0 e a outra com a 5.0.2

 

Vou checar a visualização e a impressão nas duas maquinas, depois reporto os resultados.

 

Se não me falha a memória alguns colegas tiveram problemas parecidos e só foi resolvido com a atualização do Adolbe.

Share this post


Link to post
Share on other sites

Ufa, pensei que eu já estava ficando louco...

 

enfim, hoje eu atualizei novamente o source e refiz os passos ...

E mesmo assim, nada...

só está faltando eu trocar de PC mesmo...

Share this post


Link to post
Share on other sites

Italo, algum procedimento que eu possa fazer pra tentar resolver? Ainda é o mesmo problema...

Share this post


Link to post
Share on other sites

Boa tarde Igor,

 

Checa se o Delphi não esta incluindo no executável algum DCU antigo do DACTE.

 

Não tem mais nada o que ser feito, eu simplismente executo os passos que disponibilizei e o problema é resolvido.

 

Lhe pergutei sobre a DCU, pois tem algumas pessoas que costumam alterar a configuração padrão do Delphi, fazendo com que ele crie e salve as DCUs em outra pasta que não seja a mesma onde encontra-se o fonte.

Share this post


Link to post
Share on other sites

UMA LUZ NO FIM DO TÚNEL.....

 

Fiz o seguinte... depois de muitas depurações e nenhum resultado, resolvi abrir um projeto em branco no Delphi (uso o 7) e criar um processo de impressão do zero, bem simples e...... tchã nã nã..... funcionou... imprimiu corretamente.

 

Fui no meu projeto original e estava tudo absolutamente igual ao projeto de teste (novo). 

 

O que ocorre agora: não consigo gerar a Dacte a partir do meu sistema de TMS. Depurei os fontes e são os mesmos utilizados no projeto que funcionou. Verifiquei se os diretório do projeto do TMS estão apontando para alguma pasta errada e não vi nada que estivesse fora do normal.

 

Na real, não sei mais o que fazer no meu TMS para funcionar....

 

... Italo, tem algum lugar onde eu possa verificar no meu projeto que pode estar causando esta confusão. Os meus DCUs não são gravados em diretórios diferentes, está o padrão do Delphi.

Share this post


Link to post
Share on other sites

Estou desconfiado do uso de algum outro componente (como o Gedi) no meu projeto.

 

Para contornar de imediado, eu criei um projeto apenas para imprimir a Dacte. Chamo ele do meu projeto original passando como parâmetro o arquivo xml. Está funcionando normalmente agora, desde que em projetos separados.

Share this post


Link to post
Share on other sites

Olá fiz o update do de todo o projeto e a pasta "DACTE QR3" nao existe mais..

alguem pode me passar um zip ou me explicar como faco para baixar ??

 

meu problema é que nao gera o PDF, imprimir pelo QR até vai..

mas o PDF nao gera e nao da nenhum erro tbm.!!

 

Obrigado

Share this post


Link to post
Share on other sites

Boa tarde Guilherme,

 

Se a versão do seu Quick Report for posterior a 3.0 é simples, basta descomentar a diretiva de compilação QReport_PDF que encontra-se no arquivo ACBr.inc

Share this post


Link to post
Share on other sites

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

  • Atenção !!  Este tópico está sem resposta a mais de 120 dias.