Teste SAT não compila, dá erro

[supinfor]

Bom dia amigos!

Preciso de uma ajuda. Baixei o programa SAT Teste para estudos e testes junto ao emulador da SEFAZ. O emulador está funcionando perfeitamente. Uso Delphi 7 Enterprise e a situação é a seguinte. Carrego o código fonte do SAT Teste no Delphi normalmente mas quando vai compilar dá erro referente ao código de ativação dizendo que existe um parâmetro incorreto. Porém eu dei uma revisada e não consegui achar o erro. Alguém pode me ajudar?

Obrigado!

 

[Sérgio Assunção]

21 minutos atrás, supinfor disse:

Bom dia amigos!

Preciso de uma ajuda. Baixei o programa SAT Teste para estudos e testes junto ao emulador da SEFAZ. O emulador está funcionando perfeitamente. Uso Delphi 7 Enterprise e a situação é a seguinte. Carrego o código fonte do SAT Teste no Delphi normalmente mas quando vai compilar dá erro referente ao código de ativação dizendo que existe um parâmetro incorreto. Porém eu dei uma revisada e não consegui achar o erro. Alguém pode me ajudar?

Obrigado!

 

No Delphi 7 você deve ajustar os eventos para String... veja o código abaixo:
 

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

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

 

[supinfor]

11 horas atrás, Sérgio Assunção disse:

No Delphi 7 você deve ajustar os eventos para String... veja o código abaixo:
 

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

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

 

Grande Sérgio, muito obrigado! Hoje você deu uma verdadeira aula para este amigo iniciante. Valeu amigo...