Instalação Dos Pacotes No Lazarus Para Acbrmonitor Plus

[Ivanildo]

Bom dia, primeiramente quero dar os meus parabéns a toda equipe envolvida neste novo projeto! Estou tentando instalar os pacotes para Lazarus utilizando o LEIAME.TXT mas esta dando muitos erros de dependencia. Para instalar os pacotes do ACBrMonitor Plus existe um novo procedimento?

 

Obrigado!

[Juliomar Marchetti]

Bom dia!

não , mas você pode observar ao abrir os pacotes as dependências que faltam e abrir elas antes e mandar instalar, 

se quiser pode mandar instalar todos antes de recompilar ele !

[Ivanildo]

Bom dia, obrigado pela resposta Juliomar! Instalei todos os pacotes contidos na pasta ..\pacotes\lazarus\ com excesão de um;

 

..\pacotes\lazarus\ACBrDFe\ACBrNFE\ACBr_NFe.lpk.

 

Este pacote não compila! A mensagem de erro que retorna e;

 

ACBrNFe.pas(861,1) Error: Error while compiling resources -> Compile with -vd for more details. Check for duplicates.

 

Saberiam dizer oque pode ser? Ja analisei o código mas nâo encontrei duplicidade nenhuma como sugere a mensagem de erro!

 

Ivanildo

[Bruno Trevisan]

Galera ninguem sabe o por que? 

estou a 5 dias nisso nao consigo resolver da erro na seguinte parte 

 

destructor TDownload.Destroy;
begin
  FDownload.Free;
  inherited;
end;  

 

Todos os outros objetos foram compilados somente o ACBRNFE que da esse erro :'( 

 

[Juliomar Marchetti]

Que erro?

[Bruno Trevisan]

ACBrNFe.pas(861,1) Error: Error while compiling resources -> Compile with -vd for more details. Check for duplicates.

o Memos do amigo ali em cima.

procurei aqui no forum mais somente esse tópico fala sobre esse erro e sem solução :'(

[Daniel Simoes]

Qual a versão do seu Lazarus e FPC ?

[Bruno Trevisan]

Versão do Lazarus: 1.42

os binarys do acbr baixei hj cedo pelo svn   

[Daniel Simoes]

Você está usando o "trunk2", correto ?

Tente realizar um "CleanUp + BuildAll" em Tools -> Configure Build Lazarus

[Bruno Trevisan]

Quando esta reconstruindo para no mesmo erro :'( 

destructor TDownload.Destroy;
begin
  FDownload.Free;
  inherited;
end;

 

Editado 20 Agosto, 2015 por Bruno Trevisan

[Daniel Simoes]

Porque você está me mostrando esse trecho do código ?? 

Você não respondeu se está ou não usando o Trunk2...

Aqui na DJSystem, todos usam Lazarus... e ACBr compilando sem problemas...

[Bruno Trevisan]

Porque você está me mostrando esse trecho do código ?? 

Você não respondeu se está ou não usando o Trunk2...

Aqui na DJSystem, todos usam Lazarus... e ACBr compilando sem problemas...

é nesse trecho que da o erro, e sim é o trunk2, estou abrindo o acbrEmulator Plus, todos componentes foram compilados com sucesso, menos o AcbrNFE 

http://i.imgur.com/pkSbPIg.png

destructor TDownload.Destroy;
begin
  FDownload.Free;
  inherited;
end;

ACBrNFe.pas(861,1) Error: Error while compiling resources -> Compile with -vd for more details. Check for duplicates.

 

Obrigado pelas respostas 

Mesmo erro acontece ou acontecia com o Ivanildo que iniciou o topico 

mais nao sei se ele conseguiu, ele nao falou mais nada aqui e ninguem respondeu tb 

entao sei lah rsrsrsrs, só sei q comigo nao vai kkkk

 

Editado 20 Agosto, 2015 por Bruno Trevisan

[Daniel Simoes]

Humm.. na imagem o erro está em 893 e não 861...

Apague a pasta ACBr\Lib e tente novo CleanUp+BuildAll

Verifique se o seu Lazarus está instalado e configurado corretamente... principalmente o caminho para o compilador FPC.. (ele atua como compilador de resources)

[Bruno Trevisan]

Ainda continua o mesmo erro 

o fpc que estou usando é o 2.6.4 que ja veio no lazarus 

dificil paschol ha pouca documentação restante no google, vou ver se arrumo esse erro e vou iniciar um monitor em C# 

Daniel tem mais alguma dica?

[Daniel Simoes]

Não sei o que pode ser... aqui instala tão fácil... todos desenvolvedores baixam e instalam sem problema algum...

[Juliomar Marchetti]

Com certeza!

uma pergunta lembrou que tem dll necessárias e que não acompanha o lazarus?

[Bruno Trevisan]

Qual dlls? as proprias do acbr? pq elas ja entram junto com os pacotes 

 

[Juliomar Marchetti]

vai na pasta dll do svn e veja que tem uma lista

[Bruno Trevisan]

Juliomar Marchetti vou desistalar o lazaros e vou instalar novamente ai posto os resultados 

 

 

Essas dlls são referenciadas automaticamente quando seleciono um pacote, mostra na lista de arquivos necessários 

 

 

[Bruno Trevisan]

desistalei tentei compilar e instalar 1 por 1 dos componentes sempre gera o ERRO no ACBRnfe 

[Bruno Trevisan]

Engraçado mesmo compilando com o recursos de -vd ele nao da mais detalhes e ainda pede pra mim usar o -vd mesmo marcado 

 

2.699] (3049) procedure/function destructor TACBrNFe.Destroy;
[2.700] (3049) procedure/function TACBrNFe.EnviarEmail(AnsiString,AnsiString,TStrings="nil",TStrings="nil",TStrings="nil",TStream="nil",AnsiString);
[2.700] (3049) procedure/function TACBrNFe.Notification(TComponent,TOperation);
[2.701] (3049) procedure/function TACBrNFe.GetAbout:AnsiString;
[2.701] (3049) procedure/function TACBrNFe.CreateConfiguracoes:TConfiguracoes;
[2.702] (3049) procedure/function TACBrNFe.SetDANFE(const TACBrNFeDANFEClass);
[2.702] (3049) procedure/function TACBrNFe.GetNomeModeloDFe:AnsiString;
[2.703] (3049) procedure/function TACBrNFe.GetNameSpaceURI:AnsiString;
[2.703] (3049) procedure/function TACBrNFe.CstatConfirmada(LongInt):Boolean;
300 107.706/112.608 Kb Used
[2.704] (3049) procedure/function TACBrNFe.CstatProcessado(LongInt):Boolean;
[2.704] (3049) procedure/function TACBrNFe.EhAutorizacao:Boolean;
[2.705] (3049) procedure/function TACBrNFe.IdentificaSchema(const AnsiString):<enumeration type>;
[2.718] (3049) procedure/function TACBrNFe.GerarNomeArqSchema(const TLayOut,Double):AnsiString;
[2.720] (3049) procedure/function TACBrNFe.GerarChaveContingencia(TNFe):AnsiString;
[2.720] (3049) procedure/function TACBrNFe.GerarDigito_Contigencia(out LongInt,AnsiString):Boolean is nested;
400 107.826/113.120 Kb Used
[2.725] (3049) procedure/function TACBrNFe.GetConfiguracoes:TConfiguracoesNFe;
[2.725] (3049) procedure/function TACBrNFe.SetConfiguracoes(TConfiguracoesNFe);
[2.725] (3049) procedure/function TACBrNFe.LerVersaoDeParams(TLayOut):AnsiString;
[2.726] (3049) procedure/function TACBrNFe.LerServicoDeParams(TLayOut,var Double,var AnsiString);
[2.728] (3049) procedure/function TACBrNFe.GetURLConsultaNFCe(const LongInt,const TpcnTipoAmbiente):AnsiString;
500 108.039/113.376 Kb Used
[2.728] (3049) procedure/function TACBrNFe.GetURLQRCode(const LongInt,const TpcnTipoAmbiente,const AnsiString,const AnsiString,const TDateTime,const Currency,const Currency,const AnsiString):AnsiString;
[2.737] (3049) procedure/function TACBrNFe.SetStatus(const TStatusACBrNFe);
[2.738] (3049) procedure/function TACBrNFe.Cancelamento(WideString,LongInt="0"):Boolean;
[2.740] (3049) procedure/function TACBrNFe.Consultar:Boolean;
600 108.316/114.144 Kb Used
[2.741] (3049) procedure/function TACBrNFe.Enviar(LongInt,Boolean="TRUE",Boolean="FALSE"):Boolean;
[2.742] (3049) procedure/function TACBrNFe.Enviar(AnsiString,Boolean="TRUE",Boolean="FALSE"):Boolean;
[2.744] (3049) procedure/function TACBrNFe.EnviarCartaCorrecao(LongInt):Boolean;
[2.746] (3049) procedure/function TACBrNFe.EnviarEvento(LongInt):Boolean;
700 108.489/114.400 Kb Used
[2.751] (3049) procedure/function TACBrNFe.ConsultaNFeDest(AnsiString,TpcnIndicadorNFe,TpcnIndicadorEmissor,AnsiString):Boolean;
[2.751] (3049) procedure/function TACBrNFe.Download:Boolean;
[2.752] (3049) procedure/function TACBrNFe.NomeServicoToNomeSchema(const AnsiString):AnsiString;
[2.752] (3049) procedure/function TACBrNFe.ImprimirEvento;
[2.753] (3049) procedure/function TACBrNFe.ImprimirEventoPDF;
[2.753] (3049) procedure/function TACBrNFe.ImprimirInutilizacao;
[2.753] (3049) procedure/function TACBrNFe.ImprimirInutilizacaoPDF;
800 108.646/114.400 Kb Used
[2.754] (3049) procedure/function TACBrNFe.AdministrarCSC(AnsiString,TpcnIndOperacao,LongInt,AnsiString):Boolean;
[2.755] (3049) procedure/function TACBrNFe.DistribuicaoDFe(LongInt,AnsiString,AnsiString,AnsiString):Boolean;
[2.756] (3049) procedure/function TACBrNFe.Inutilizar(AnsiString,AnsiString,LongInt,LongInt,LongInt,LongInt):Boolean;
[2.757] (3049) procedure/function TACBrNFe.EnviarEmailEvento(AnsiString,AnsiString,TStrings="nil",TStrings="nil",TStrings="nil");
[2.758] (3049) procedure/function constructor TCartaCorrecao.Create(TComponent);
[2.759] (3049) procedure/function destructor TCartaCorrecao.Destroy;
[2.760] (3049) procedure/function constructor TDownload.Create(TComponent);
[2.760] (3049) procedure/function destructor TDownload.Destroy;
900 108.858/114.400 Kb Used
[2.799] Searching file D:\trevisan\NFE Emulador\Fontes\ACBrDFe\ACBrNFe\ACBrNFeServicos.rc... found
[2.799] Searching file D:\trevisan\NFE Emulador\Fontes\ACBrDFe\ACBrNFe\ACBrNFeServicos.rc... found
[2.799] Searching file C:\lazarus\fpc\2.6.4\bin\i386-win32\windres.exe... found
[2.800] Searching file C:\lazarus\fpc\2.6.4\bin\i386-win32\cpp.exe... found
[2.800] (9022) Compiling resource D:\trevisan\NFE Emulador\Fontes\ACBrDFe\ACBrNFe\ACBrNFeServicos.rc
[2.800] (9028) Calling resource compiler "C:\lazarus\fpc\2.6.4\bin\i386-win32\windres.exe" with "--include D:/trevisan/NFE Emulador/Fontes/ACBrDFe/ACBrNFe/ --preprocessor=C:\lazarus\fpc\2.6.4\bin\i386-win32\cpp.exe --include C:\lazarus\fpc\2.6.4\bin\i386-win32\ -O res -o "D:\trevisan\NFE Emulador\Lib\Lazarus\ACBrNFe\i386-win32\ACBrNFeServicos.res" D:/trevisan/NFE Emulador/Fontes/ACBrDFe/ACBrNFe/ACBrNFeServicos.rc" as command line
Usage: C:\lazarus\fpc\2.6.4\bin\i386-win32\windres.exe [option(s)] [input-file] [output-file]
 The options are:
  -i --input=<file>            Name input file
  -o --output=<file>           Name output file
  -J --input-format=<format>   Specify input format
  -O --output-format=<format>  Specify output format
  -F --target=<target>         Specify COFF target
     --preprocessor=<program>  Program to use to preprocess rc file
  -I --include-dir=<dir>       Include directory when preprocessing rc file
  -D --define <sym>[=<val>]    Define SYM when preprocessing rc file
  -U --undefine <sym>          Undefine SYM when preprocessing rc file
  -v --verbose                 Verbose - tells you what it's doing
  -c --codepage=<codepage>     Specify default codepage
  -l --language=<val>          Set language when reading rc file
     --use-temp-file           Use a temporary file instead of popen to read
                               the preprocessor output
     --no-use-temp-file        Use popen (default)
  -r                           Ignored for compatibility with rc
  @<file>                      Read options from <file>
  -h --help                    Print this help message
  -V --version                 Print version information
FORMAT is one of rc, res, or coff, and is deduced from the file name
extension if not specified.  A single file name is an input file.
No input-file is stdin, default rc.  No output-file is stdout, default rc.
C:\lazarus\fpc\2.6.4\bin\i386-win32\windres.exe: supported targets: pe-i386 pei-i386 elf32-i386 elf32-little elf32-big srec symbolsrec verilog tekhex binary ihex
[2.810] (9029) Error while compiling resources
[2.810] (10026) There were 1 errors compiling module, stopping
[2.814] Searching file D:\trevisan\NFE Emulador\Fontes\ACBrDFe\ACBrNFe\DANFE\ACBrNFeDANFEClass.pas... found
[2.814] Searching file D:\trevisan\NFE Emulador\Fontes\ACBrDFe\ACBrNFe\ACBrNFeWebServices.pas... found
[2.815] Searching file D:\trevisan\NFE Emulador\Fontes\ACBrDFe\ACBrNFe\ACBrNFeNotasFiscais.pas... found
[3.135] (1018) Compilation aborted
Error: C:\lazarus\fpc\2.6.4\bin\i386-win32\ppc386.exe returned an error exitcode (normal if you did not specify a source file to be compiled)

 

Galera da uma olhadinha na saida 

(normal se você não especificar um arquivo de origem para ser compilado ) 

boiei 

 

[Bruno Trevisan]

Galera eu tirei o seguinte comando do acbrNFE.pas 

{$IFDEF FPC}
 {$R ACBrNFeServicos.rc}
{$ELSE}
 {$R ACBrNFeServicos.res}
{$ENDIF}

 

é substitui apenas por  {$R ACBrNFeServicos.res}

E agora foi, pq copiando as mensagens de saida sempre dava erro no arquivo AcbrNFEservicos.rc, esse arquivo pelo que eu entendi ele cria o acbrnfeservicos.res copiando os valores do ini, copilei o AcbrNFEservicos.rc  manualmente usando o seguinte comando no dos:

'BRCC32.EXE -foACBrNFeServicos.res ACBrNFeServicos.rc'

e funcionou corretamente quem tiver o mesmo erro que eu 

altere o arquivo AcbrNFE.pas dentro da pasta Fontes. 

 

Comigo Funcionou  

 

Um agradecimento para 

Juliomar Marchetti 
Daniel Simoes

Obrigado pelas respostas e pela paciência. 

 

 

 

Editado 21 Agosto, 2015 por Bruno Trevisan

[Daniel Simoes]

Muito provavelmente o seu problema original seja porque você instalou o ACBr em um diretório com espaços no Nome... (D:\trevisan\NFE Emulador\) e isso causou um erro quando o Lazarus executou o WINDRES.EXE

 

[Fernando Cano Vanessa Cano]

Bom dia!

Estou utilizando Lazarus v1.1 FPC: 2.6.1, estou com os fontes atualizados, segui o arquivo "Bem_Vindo_ao_Trunk2.pdf", desinstalei tudo, apaguei os arquivos e reinstalei e não tive sucesso.

Na compilação do pacote ACBrDFeComum está retornando esse erro:

C:\ACBR_2015\trunk2\Fontes\ACBrCapicom\ACBrHTTPReqResp.pas(307,53) Error: Can't take the address of constant expressions

Arquivo: C:\ACBR_2015\trunk2\Fontes\ACBrCapicom\ACBrHTTPReqResp.pas

na linha de comando:  

  //DEBUG
  //WriteToTXT('c:\temp\httpreqresp.log', FormatDateTime('hh:nn:ss:zzz', Now)+ ' - Abrindo sessão');

   CertContext.Get_CertContext( integer(PCertContext));

Por favor, alguém poderia me dar uma ajuda?

Grato.

 

 

 

[Daniel Simoes]

Porque você está usando uma versão tão antiga do Lazarus ?

Provavelmente seu Lazarus está achando algum "PPU" da versão anterior do ACBr... o .BAT de limpeza do ACBr é apenas para Delphi...

Para Limpar todo o ACBr do Lazarus, apenas apague a pasta ACBr\Lib,  e faça um "CleanUp+BuildAll" na sua IDE