Ahora si que me perdí
Yo por ejemplo tengo estas 2 clases:
Código Delphi
[-]
TPadre = class
procedure Vamos;
procedure Ejecutar; virtual; abstract;
end;
THijo = class(TPadre)
procedure Ejecutar; override;
end;
procedure TPadre.Vamos;
begin
Ejecutar;
end;
procedure THijo.Ejecutar;
begin
ShowMessage('Hola');
end;
Ahora creamos una instancia de la clase hija y llamamos al procedimiento "Vamos", que pertenece a la clase padre y este a su vez llama al procedimiento "Ejecutar" que esta implementado dentro de la clase hija:
Código Delphi
[-]
begin
with THijo.Create do
try
Vamos;
finally
Free;
end;
end;
Según entiendo eso es lo que querías, a menos que lo que quieras es llamar un procedimiento de la clase hija que no este declarado en la clase padre. Eso ya lo veo difícil, de hecho no creo ni que compile. Lo único que se me ocurre es lo siguiente:
Código Delphi
[-]
TPadre = class
procedure Vamos;
end;
THijo = class(TPadre)
procedure Ejecutar;
end;
procedure TPadre.Vamos;
begin
THijo(Self).Ejecutar;
end;
procedure THijo.Ejecutar;
begin
ShowMessage('Hola');
end;
Esto ultimo no se hasta que punto es correcto, estamos obligando a la clase padre a depender de la hija, esto es contra natura