sat Erro na passagem de parâmetros no SAT

[marioxavierfilho]

Depois da ultima atualização, estou tendo problemas com o Código de ativação e o código de vinculação. Não sei porque, o que esta salvo no arquivo de configuração não é lido pelo SAT.

Pelo o que eu pude analisar 

essa função q está abaixo q era responsável de trazer o código de ativação  está vindo em branco. Em um cliente pra resolver, digitei diretamente na programação o codigo de ativação. só assim funcionou!

Aguem tem alguma ideia do que seja?

 

Abaixo o código que eu acho que está com problema

function TACBrSAT.GetcodigoDeAtivacao : AnsiString ;
var
  AcodigoDeAtivacao : AnsiString ;
begin
  AcodigoDeAtivacao := '';

  if Assigned( fsOnGetcodigoDeAtivacao ) then
     fsOnGetcodigoDeAtivacao( AcodigoDeAtivacao ) ;

  Result := AcodigoDeAtivacao;
end;

 

Muito obrigado e espero resposta!

[André Ferreira de Moraes]

O que vc colocou no OnGetcodigoDeAtivacao da sua aplicação?

[marioxavierfilho]

EU fiz os testes utilizando o código de exemplo. Simplesmente configurei o código de teste conforme eu fazia antes, não modifiquei nada.

Então não mandei nada de diferente pro OnGetcodigoDeAtivaca, poque antes também não enviava nada diferente a não ser completar o edtCodigoAtivacao.text.

[Sérgio Assunção]

20 horas atrás, marioxavierfilho disse:

EU fiz os testes utilizando o código de exemplo. Simplesmente configurei o código de teste conforme eu fazia antes, não modifiquei nada.

Então não mandei nada de diferente pro OnGetcodigoDeAtivaca, poque antes também não enviava nada diferente a não ser completar o edtCodigoAtivacao.text.

Depure o seu projeto e veja se realmente se você está enviando o código de ativação para o componente.

[marioxavierfilho]

Como eu disse. Eu estou usando o próprio sistema de teste que vem na pasta exemplo. Desculpe a minha ignorância, mas fora configurar os dados nos campos, tem q modificar mas alguma coisa no sistema de exemplo??.  

[pauloesc1]

Bom dia pessoal, tudo bem?!

Mario, você conseguiu resolver este problema de alguma forma?! Depois que atualizamos os componentes da Acbr ficamos com o mesmo problema. Se tiver solucionado você pode nos passar?!

 

Um abraço!

 

[Daniel Simoes]

Qual a versão do seu Delphi ?

[Robson Moreira]

Ola Senhores, Tudo bem?

Estou tendo problemas em Delphi 10 Seattle,

O Exemplo funciona muito bem, mas meu código não. Acho que estou esquecendo de declarar ou inicializar algo. Não retorna o código de ativação pq a cláusula if Assigned retorna FALSO. Vcs saberiam me dizer em que eu estou errando?

GRATO!

function TACBrSAT.GetcodigoDeAtivacao : AnsiString ;
var
  AcodigoDeAtivacao : AnsiString ;
begin
  AcodigoDeAtivacao := '';

  if Assigned( fsOnGetcodigoDeAtivacao ) then
     fsOnGetcodigoDeAtivacao( AcodigoDeAtivacao ) ;

  Result := AcodigoDeAtivacao;
end;

 

[Daniel Simoes]

Você declarou o evento na IDE ? 

Na dúvida, apague o evento atual, e crie um novo...

[Robson Moreira]

Em 16/01/2017 at 13:42, Daniel Simoes disse:

Você declarou o evento na IDE ? 

Na dúvida, apague o evento atual, e crie um novo...

Olá Daniel, Boa noite.

Não havia declarado realmente. Bastou um duplo clique no evento do componente e a IDE criou e vinculou o código corretamente. Obrigado!