Delphi - Agregar un Evento a una clase

Hola!
Quisiera saber si alguien tiene idea de COMO agregar a una clase un evento, la idea seria que al ejecutarse un proceso en particular se dispare un evento y ese pueda ser manejado por un formulario.
desde ya muchisimas gracias..

abaddon

En la clase agrega una propiedad OnEvento de tipo TNotifyEvent u algún otro tipo de Procedure of Object.

type
Clase = class...
:
Published
:
OnEvento: TNotifyEvent;
:
end;

Dentro del método de tu clase en el que quieras llamar al manejador de evento, primero compruebas que haya uno asignado, y si lo hay entonces lo llamas usando el nombre de la propiedad:

if Assigned(OnEvent) then
OnEvent(Self); // Pasa la instancia actual como el parámetro Sender
:

Espero que te sirva.

Ernesto De Spirito
http://www.latiumsoftware.com/es/index.php