ACBrSAT1GetcodigoDeAtivacao

[Douglas]

Olá!

Qdo tento compilar o exemplo SATTeste ocorre este esta mensagem:

---------------------------
Error
---------------------------
The ACBrSAT1GetcodigoDeAtivacao method referenced by ACBrSAT1.OnGetcodigoDeAtivacao has an incompatible parameter list. Remove the reference?
---------------------------
Yes   No   Cancel   Help   
---------------------------
Como posso resolver ? Estou usando Delphi7 o projeto até abre sem nenhum erro.

[Sérgio Assunção]

No D7 existe a incompatibilidade com o AnsiString.

Basta você excluir o evento GetcodigoDeAtivacao e o ACBrSAT1GetsignAC e acrescentá-los novamente que o D7 vai ajustar para o String.

Como deve ficar no D7:

procedure TForm1.ACBrSAT1GetcodigoDeAtivacao(var Chave: String);
begin
  Chave := edtCodigoAtivacao.Text;
end;

procedure TForm1.ACBrSAT1GetsignAC(var Chave: String);
begin
  Chave := edtSwHAssinatura.Text;
end;

 

[CmSistemas]

Sergio o meu estava dando esse erro acertei o sistema compila tudo so que ele nao executa o GetcodigoDeAtivacao coloquei um SHowmessage nos dois na assinatura e codigo de ativacao so me aparece assinatura sabe o que pode estar acontecendo ja viu de nao executar a procedure ? Se puder me ajudar agradeco muito

[Sérgio Assunção]

13 horas atrás, CmSistemas disse:

Sergio o meu estava dando esse erro acertei o sistema compila tudo so que ele nao executa o GetcodigoDeAtivacao coloquei um SHowmessage nos dois na assinatura e codigo de ativacao so me aparece assinatura sabe o que pode estar acontecendo ja viu de nao executar a procedure ? Se puder me ajudar agradeco muito

Você está usando o Delphi 7 ?

[CmSistemas]

Sim estou

[Sérgio Assunção]

1 hora atrás, CmSistemas disse:

Sim estou

Logo acima eu expliquei a solução a ser aplicada para o Delphi 7.