![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
#2
|
||||
|
||||
|
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;
Código:
THeredada = class(TClase) public procedure Metodo; override; end; Código:
procedure THeredada.Metodo;
begin
inherited; {Aquí hace que se ejecute el método de la clase heredada}
ShowMessage('Chau Mundo!!');
end;
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.
|
| Herramientas | Buscar en Tema |
| Desplegado | |
|
|
|