Como interrumpir un evento

[ecfisa]

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.

[JerS]

Empezado por ecfisa

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.

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

[ecfisa]

Empezado por JerS

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

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.

[Neftali [Germán.Estévez]]

Empezado por ecfisa

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

¿Interrumpir o Interceptar?

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