Estoy con Román muchos eventos se producen por eso mismo porque son eventos y pueden o no producirse y no dependen de nosotros sino del usuario y las acciones que realice, por cierto a veces son de lo más peregrinas.
Código:
procedure TForm1.Edit1Change(Sender: TObject);
var
n,n1,n2:Integer;
begin
if edit1.Text = 'Pepe' then
begin
n1:=15;
n2:=15;
n:=n1+n2;
ShowMessage('Resultado:'+IntToStr(n));
end;
//Y sino escribes Pepe no hago nada?
end;
Por lo tanto creo que si el evento puede producirse a pesar nuestro, por qué no controlar el propio evento?
Un Saludo.