Tengo el siguiente caso
Código Delphi
[-]
procedure TClasePadre.Metodo;
begin
if(Propiedad = 'Algo') then
begin
exit;
end;
end;
procedure TClaseHijo.Metodo;
begin
inherited;
end;
Cuando creo un hijo de la clase, y sobreescribo este procedimiento quisiera que en algunos casos no ejecutar el codigo que esta en la clase hijo.
¿Como puedo hacer esto?.
Por el momento solucioné preguntando por el valor de la propiedad en la clase hijo, pero quisiera saber si se puede hacer algo desde la clase padre.
Código Delphi
[-]
procedure TClaseHijo.Metodo;
begin
inherited;
if(Propiedad = 'Algo) then
exit;
end;
Saludos
Bismarck