Hola Craven,
Te cuento el proceso, primero mira en la ayuda el evento que quieres "retocar" a ver en que objeto esta declarado, en el caso de OnChange esta definido en TCustomEdit, asi que me voy al fuente correspondiente y localizo donde se usa, en este caso TCustomEdit.Change y veo que esta declarado como Dynamic, es decir se puede heredar, perfecto, pues la solucion es:
Código:
TMiControl = Class (TEdit)
protected
procedure Change; override;
..
Implementation
procedure TMiControl.Change;
begin
< tu codigo >
inherited;
< tu codigo >
end;
Puedes elegir si quieres que tu codigo se ejecute antes o despues del codigo original o incluso si no quieres que se ejecute, quitas el inherited y listo.