JrLopes

Bom dia @Daniel Simoes 
 O evento OnAguardaResp do TEFD já estava com essa linha de código, eu já estava perdendo os poucos cabelos que eu tinha com essa situação mas acabei de resolver, a gente se desespera mas no final a resposta acaba sendo simples, basicamente um IF matou a questão, não sei se é a melhor solução mas resolveu certinho a questão do roteiro.  

Obrigado !!!!
procedure TfrmOpTEF.TEFDAguardaResp(Arquivo: string; SegundosTimeOut: Integer;var Interromper: Boolean); begin Application.ProcessMessages; if (TEFD.GPAtual in [gpCliSiTef, gpVeSPague]) then // É TEF dedicado ? begin if (Arquivo = '23') and (not btCancelar.Visible) then // Está aguardando Pin-Pad ? begin if TEFD.TecladoBloqueado then begin TEFD.BloquearMouseTeclado(False); // Desbloqueia o Teclado end; btCancelar.Visible := True; btCancelar.SetFocus; cancelar := False; Application.ProcessMessages; end else begin Application.ProcessMessages; if cancelar = True then begin btCancelar.Visible := False; Interromper := True; cancelar := False; end else begin cancelar := False; Exit; end; end; end; Application.ProcessMessages; end;