Como interrumpir un evento
 

Muy buenas Tardes amigo,

Queria que me ayudaran un poco con lo siguiente, tengo un formulario en el cual mando a ejecutar desde su creación un procedimiento el cual esta activo esperando que coloque la huella para poder identificar a la persona que marque, pero me gustaria en cierto momento interrumpir este procedimiento que se esta ejecutando en loop para poder hacer click a otro boton! como haria en este caso?

Sería más fácil si pones tu código :)

Hola JerS.

Si no interpreté mal lo que buscas, podrías hacer:

Código Delphi [-]
var
 OldEvent: TNotifyEvent;
begin 
  OldEvent := Componente.NombreEvento;  // salvar evento
  Componente.NombreEvento := nil;       // desactivar evento  
  // ... 
  // operaciones a realizar con el evento desactivado
  // ...
  Componente.NombreEvento := OldEvent;  // restaurar evento
end;

Saludos.

Eso sin duda alguna... ;)

Saludos. :)

Excelente ecfisa, me leiste la mente y diste justo en la solución! muchas Gracias!!!

¿Interrumpir o Interceptar?

Yo tampoco me estoy aclarando con lo que necesitas...

Me alegro que te haya servido :)

No me explayé mucho en el código por que sinceramente no estaba seguro de si había interpretado lo que buscabas.

Pero ahora sabiendo que el tema va por ahí, y aunque tal vez no sea crítico en este caso, es mas robusto:

Código Delphi [-]
  ... 
  Componente.NombreEvento := nil;       // desactivar evento 
  try
    // ... 
    // operaciones a realizar con el evento desactivado
    // (y que pueden fallar...)  ;)
  finally
    Componente.NombreEvento := OldEvent   // restaurar evento
  end;
  ...

Saludos.