Tema: Herencia
Ver Mensaje Individual
  #2  
Antiguo 12-09-2003
Avatar de delphi.com.ar
delphi.com.ar delphi.com.ar is offline
Federico Firenze
 
Registrado: may 2003
Ubicación: Buenos Aires, Argentina *
Posts: 5.934
Reputación: 27
delphi.com.ar Va por buen camino
La verdad que no entiendo mucho tu problema, si tu problema es que no se ejecuten los métodos heredados o es otro, si tu tienes una clase

Código:
TClase = class
public
  procedure Metodo; virtual;
end;

...

procedure TClase.Metodo;
begin
  ShowMessage('Hola Mundo!');
end;
y creo una clase heredada de esta que sobreesciba el método:

Código:
THeredada = class(TClase)
public
  procedure Metodo; override;
end;
Si quiero que en la implementación del método se ejecuten el método de la clase base:
Código:
 
procedure THeredada.Metodo;
begin
  inherited; {Aquí hace que se ejecute el método de la clase heredada}  
  ShowMessage('Chau Mundo!!');
end;
Aquí evito que ejecute el metodo heredado:
Código:
 
procedure THeredada.Metodo;
begin
  {Como verás no llama al metodo heredado (inherited) }
  ShowMessage('Chau Mundo!!');
end;

¿Es esta tu duda?

Saludos!
__________________
delphi.com.ar

Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla.
Responder Con Cita