Procedure SetVisible... ; override

[elcigarra]

procedure SetVisible(Value: Boolean); override

Puse esto en un componente descendiente de TPanel para que realice unas operaciones antes de cambiar su propiedad "Visible". Sin embargo esto me da un error de compilación diciendo que el procedimiento SetVisible no existe en la clase base. ¿Alguien sabe porqué o como puedo hacer que haga algo antes de hacerse visible?

Otra cosa que intenté es dejarlo sin override pero a la propiedad visible publicada ponerle:
property Visible: Boolean read FVisible write SetVisible
pero no le hace caso