problema con sobreescritura

[rojo raton]

Hola a todos. Tengo un problema con sobreescritura de métodos. Supongamos que tengo
estas 3 clases:

Código Delphi [-]
Tanimal = class     
   procedure Comer;virtual; 
end;  

Therbivoro = class(Tanimal)    
    procedure Comer;override; 
end;   

Tvaca = class(Therbivoro)   
    procedure Comer;//que directiva va aca? 
end;

en las 2 primeras clases no hay problema, pude sobreescribir y todo bien.
Ahora, apareció esta tercera clase (Tvaca) que necesita sobreescribir
el método "comer" de la clase Therviboro.
¿como haría eso?

La ayuda de delphi me dice que solo puedo sobreescribir metodos virtuales.