Francis Silva

Fiz uma nova correção nos DPK de relatórios do QuickReport. Os arquivos: ACBR\PACOTES\DELPHI\ACBr_BoletoFC_Quick.dpk ACBR\PACOTES\DELPHI\ACBrNFe2\ACBrCTeDacteQRpkg.dpk ACBR\PACOTES\DELPHI\ACBrNFe2\ACBrMDFeDAMDFEQRpkg.dpk ACBR\PACOTES\DELPHI\ACBrNFe2\ACBrNFeDanfeQRpkg.dpk ACBR\PACOTES\DELPHI\ACBrNFe2\ACBrNFeDanfeQRpkg_Delphi6.dpk não estavam fazendo referência a runtime library do QuickReport e por esse motivo, apesar de compilar normalmente, quando se abria o Delphi ocorriam vários erros de uma mesma unit estar sendo usado por mais de um package. O que fiz para corrigir o problema foi apenas acrescentar as linhas abaixo na seção requires dos respectivos arquivos DPK: {$IFDEF VER150} QR5RunD7, vcljpg, visualclx; {$ENDIF} // D7 {$IFDEF VER170} QR5RunD2005, vcljpg; {$ENDIF} // D2005 {$IFDEF VER180} {$IFNDEF VER185} QR5RunD2006, vcljpg; {$ENDIF} // D2006 {$ENDIF} {$IFDEF VER185} QR5RunD2007, vcljpg; {$ENDIF} // D2007 Diego Gonçalves 25/07/2013 {$IFDEF VER190} QR5RunD2007, vcljpg; {$ENDIF} // D2007 Diego Gonçalves 25/07/2013 {$IFDEF VER200} QR5RunD2009, vclimg; {$ENDIF} // D2009 {$IFDEF VER210} QR5RunD2010, vclimg; {$ENDIF} // D2010 {$IFDEF VER220} QR5RunDXE, vclimg; {$ENDIF} // XE {$IFDEF VER230} QR5RunDXE2, vclimg; {$ENDIF} //XE2 {$IFDEF VER240} QR5RunDXE3, vclimg; {$ENDIF} //XE3 {$IFDEF VER250} QR5RunDXE4, vclimg; {$ENDIF} //XE4 Mas uma vez peço a ajuda de quem puder aplicar estas atualizações ao repositório. ACBr.7z

Bom, a cláusula class antes da declaração de uma procedure ou function serve para indicar que o procedimento/função é um método de classe, ou seja, não depende de uma instância de objeto para ser executado, podendo ser executado utilizando a síntaxe TNomeClasse.NomeDoMétodo. Entretanto neste caso específico o procedimento ImprimirCampinas não esta dentro de uma classe, na verdade ele é um procedimento local dentro de outro procedimento. Então quando o Delphi tentava compilar a unit ACBrNFSeDANFSeQRClass.pas ocorria um erro informando que o identificador ImprimirCampinas não havia sido localizado.

Encontrei e corrigi um erro na unit ACBr\Fontes\ACBrBoleto\ACBrBoletoFCQuickFr.pas que estava impedindo a compilação do pacote. O erro estava na cláusula uses no início do arquivo (linhas 48-50) que estava linkando units do FortesReport. Ainda na cláusula uses faltava adicionar a unit QRPDFFilt.pas que também é utilizada. A unit corrigida encontra-se em anexo. Alguém poderia validar e atualizar essa unit no repositório, por favor? Obrigado. ACBrBoletoFCQuickFr.pas

Encontrei problemas para compilar a unit ACBr\Fontes\ACBrNFSe\ACBrNFSeDANFSeQRClass.pas, na procedure TACBrNFSeDANFSeQR.ImprimirDANFSeCampinas, nas versões do Delphi XE2-XE4. Os erros encontrados e as correções que fiz foram: Linha 113: Antes : class procedure ImprimirCampinas(ANFSe : TNFSe; Depois: procedure ImprimirCampinas(ANFSe : TNFSe; Linha 130: Antes: with Create ( nil ) do Depois: with TACBrNFSeDANFSeQR.Create ( nil ) do Com estas duas alterações consegui compilar o package para todos o Delphi XE2-XE4. Será que vocês poderiam validar estas alterações e atualizarem no repositório? Obrigado. ACBrNFSeDANFSeQRClass.pas