Delphi - Definir eventos en clases propias

Buenas. Mi problema es:

Tengo que definir una calse propia, derivada de TImage. La cosa es que quiero que tenga los eventos OnDragOver y OnDragDrop. Pero no sé cómo hacerlo. Si alguien puede darme una ayuda o una dirección donde encontrar la info, le agradecería.

Saludos.

yo declaro un evento asi:

type
TMiEvento = procedure(const Data: String) of object;

TMiClase = class(TObject)
private
FOnSomething: TMiEvento;
public
property OnSomething: TMiEvento read FOnSomething write FOnSomething
end;

y luego para llamarlo solo pones
if Assigned(FOnSomething) then OnSomething('evento ejecutado');