¿como abortar ejecución de eventos?

[[maeyanes]]

Para volver a asignar un evento por código:

Código Delphi [-]
DBEdit.OnExit := DBEditOnExit;

Ahora, si bien existe un exception Abort, no se si se pueda usar para estos fines...

También tienes el uso del Exit que se puede usar con la segunda forma que te comente:

Código Delphi [-]
procedure TForm1.DBEditOnExit(Sender: TObject);
begin
  if TalCondicion then
    Exit;
  // Código que deseas ejecutar si no se comple la condición de salida...
end;

Saludos...

[pjjorda]

Gracias de nuevo,

al ejecutar DBEdit1.OnExit := DBEdit1OnExit;
obtengo:
[Error] : Undeclared identifier: 'DBEDIT11ONEXIT'
algo no hago bien.

[pjjorda]

He creado una variable tipo Dbedit, a la que copio Dbedit1 al abrir el form.
y luego le paso a dbedit1 el evento Onexit cuando es necesario.

Repito muchas gracias Maeyanes.