Evento OnObtemCampo não atribuido.

[Rui Menezes Desenvolvedor]

Estou iniciando implantacao do paygo  web,  quando executo o codigo abaixo da o erro 

Evento OnObtemCampo não atribuido.

no exemplo do acbr funciona normal.

Fico no aguardo da ajuda dos amigos.

 //ConfigurarTEF;
    ACBrTEFD.ArqLOG      := ExtractFilePath(Application.ExeName)+'LogPayGoWeb.text';
    ACBrTEFD.TrocoMaximo := 0;
    ACBrTEFD.ImprimirViaClienteReduzida := False;
    ACBrTEFD.MultiplosCartoes           := False ; //bTEFMultiplosCartoes;
    ACBrTEFD.NumeroMaximoCartoes        := 10;
    ACBrTEFD.SuportaDesconto            := False;
    ACBrTEFD.SuportaSaque               := False;

    ACBrTEFD.Identificacao.SoftwareHouse        := 'GYNGO AUTOMACAO COMERCIAL EIRELI - ME'; //edRazaoSocial.Text;
    ACBrTEFD.Identificacao.RegistroCertificacao := '123456';
    ACBrTEFD.Identificacao.NomeAplicacao        := 'GESTOR';
    ACBrTEFD.Identificacao.VersaoAplicacao      := '7.0';

    ACBrTEFD.TEFPayGo.SuportaReajusteValor      := False;
    ACBrTEFD.TEFPayGo.SuportaNSUEstendido       := True;
    ACBrTEFD.TEFPayGo.SuportaViasDiferenciadas  := True;

    // Configurações abaixo são obrigatórios, para funcionamento de Não Fiscal //
    ACBrTEFD.AutoEfetuarPagamento := False;
    ACBrTEFD.AutoFinalizarCupom := False;
    //ConfigurarTEF;

    //ACBrTEFD.TEFPayGoWeb.OnObtemCampo := False;//CliSiTefObtemCampo;
    ACBrTEFD.Inicializar(TACBrTEFDTipo( 18 ));

 

[BigWings]

30 minutos atrás, Rui Menezes Desenvolvedor disse:

    //ACBrTEFD.TEFPayGoWeb.OnObtemCampo := False;//CliSiTefObtemCampo;

OnObtemCampo é um evento do componente, ele precisa estar implementado.

[Rui Menezes Desenvolvedor]

desculpa a minha ignoraca  mas o que eu coloco neste 

//ACBrTEFD.TEFPayGoWeb.OnObtemCampo := 

[Rui Menezes Desenvolvedor]

6 minutos atrás, Rui Menezes Desenvolvedor disse:

 

ja deu certo aqui , valeu BigWings

 

Editado 14 Setembro, 2020 por Rui Menezes Desenvolvedor

[Daniel Simoes]

Veja o TEFDEmoNF