[ACBr_TCP] Erro instalação Trunk 2

[alexisdiel]

Acabei de baixar o trunk 2 e marquei todas as opções ao tentar instalar para o Delphi 2010 recebi o seguinte erro:

Citar

Copyright (c) 1983,2009 Embarcadero Technologies, Inc.
C:\ACBR\Fontes\ACBrTCP\ACBrMTer.pas(233) Error: E2033 Types of actual and formal var parameters must be identical
C:\ACBR\Fontes\ACBrTCP\ACBrMTerClass.pas(93) Fatal: F2063 Could not compile used unit 'ACBrMTer'
Compilation failure
Erro ao compilar o pacote "ACBr_TCP.dpk".

 

[Cezar]

Estou com o mesmo problema!

C:\ACBr\Fontes\ACBrTCP\ACBrMTer.pas(233) Error: E2033 Types of actual and formal var parameters must be identical
C:\ACBr\Fontes\ACBrTCP\ACBrMTerClass.pas(93) Fatal: F2063 Could not compile used unit 'ACBrMTer'

[Elenilson]

Fiz essa atualização e tive esse mesmo problema.

Já removi tudo relativo a versão anterior.

Alguem sabe como resolver esse problema

[Cezar]

Resolvi assim: Abri a unit ACBrMTer e alterei dessa maneira

como estava

procedure TACBrMTer.DoRecebeDados(const TCPBlockSocket: TTCPBlockSocket;
  const Recebido: AnsiString; var Enviar: AnsiString);
var
  wIP, wRecebido: String;
begin
  wIP := TCPBlockSocket.GetRemoteSinIP;

  GravaLog('Terminal: ' + wIP + ' - RecebeDados: ' + Recebido);

  wRecebido := fMTer.InterpretarResposta(Recebido);

  if (wRecebido = '') then
    Exit;

  if Assigned(fOnRecebeDados) then
    OnRecebeDados(wIP, wRecebido);

  if (EcoAuto) then
    Enviar := fMTer.ComandoEco(wRecebido);
end;

 

como ficou

 

procedure TACBrMTer.DoRecebeDados(const TCPBlockSocket: TTCPBlockSocket;
  const Recebido: AnsiString; var Enviar: AnsiString);
var
  wIP, wRecebido: AnsiString;
begin
  wIP := TCPBlockSocket.GetRemoteSinIP;

  GravaLog('Terminal: ' + wIP + ' - RecebeDados: ' + Recebido);

  wRecebido := fMTer.InterpretarResposta(Recebido);

  if (wRecebido = '') then
    Exit;

  if Assigned(fOnRecebeDados) then
    OnRecebeDados(wIP, wRecebido);

  if (EcoAuto) then
    Enviar := fMTer.ComandoEco(wRecebido);
end;

[Elenilson]

Pois é, funcionou. Obrigado.

[Daniel Simoes]

A correção já está no SVN