Boa noite,
Eu atualizei o código do ACBR agora, e fui compilar está apresentando o erro abaixo:
[Error] ACBrNFSeXDANFSeRLISSNet.pas(391): Undeclared identifier: 'SplitString'
Então verifiquei que foi por causa da utilização da função SplitString que não existe no Delphi 7 e foi implementada na atualização abaixo.
Não seria possível alterar a utilização da função SplitString pela função Split da unit ACBrUtil.Strings. O código ficaria assim:
procedure TfrlXDANFSeRLISSnet.rlbCabecalhoBeforePrint(Sender: TObject; var PrintIt: Boolean);
var
strPrefeitura : TSplitResult;
begin
inherited;
With fpNFSe do
begin
TDFeReportFortes.CarregarLogo(rliLogo, fpDANFSe.Logo);
rllNumNF0.Caption := Numero;
// Somente as 3 primeiras linhas serão utilizadas
strPrefeitura := ACBrUtil.Strings.Split(FQuebradeLinha[1], fpDANFSe.Prefeitura);
if (Length(strPrefeitura) >= 1) then
rlmPrefeitura1.Caption := strPrefeitura[0];
if (Length(strPrefeitura) >= 2) then
rlmPrefeitura2.Caption := strPrefeitura[1];
if (Length(strPrefeitura) >= 3) then
rlmPrefeitura3.Caption := strPrefeitura[2];
end;
end;
Peço que algum ajuste seja feito o quanto antes, sei que o Delphi 7 não é a melhor opção, mas como é um sistema legado, fica muito difícil de migrar.
Desde já agradeço.
