6 replies to this topic

[JoAnCa]

Hola a todos
Sera porque lo he usado muy poco, y cuando lo he hecho es en procedimientos ya elaborados, pero aun no entiendo el funcionamiento de inherited y override 

Me podrian explicar que hace cada uno, y en que situación es cuando se deben emplear? 

[Fenareth]

Cuando se hace uso de la herencia en Delphi, la clase Madre tiene definidos procedimientos y funciones que cuando se genera una instancia de la clase (clase Hija) ésta última hereda el comportamiento de la madre a través del inherited.

Supongamos que la clase Madre en su evento OnCreate muestra algún mensaje a través de un showmessage... al generar una clase Hija de ella, en el evento OnCreate de la Hija aparecerá la palabra inherited que significa que la clase Hija también mostrará el mensaje definido en la clase Madre...

Aquí hay dos cosas interesantes:

1. Si tu suprimes la palabra reservada inherited de la clase Hija, ésta no tomará el comportamiento de la clase Madre.

2. La clase Hija puede hacer cosas adicionales al inherited de la clase Madre... algo así:

delphi

   inherited;
   // Más código propio de la clase hija

o

delphi

   // Más código propio de la clase hija
   inherited;

o

delphi

   // Más código propio de la clase hija
   
   inherited;
 
   // Más código propio de la clase hija

En caso del override se usa cuando en la clase Madre se ha declarado un procedimiento o función virtual y permite sobreescribir las funciones pertenecientes a la clase Madre, en la clase Hija...

Espero que haya quedado un poco claro y te recomiendo amigo, que hagas un ejemplito usando herencia en Delphi para que puedas aplicar y explicarte a ti mismo de manera más clara éstos dos conceptos....

Cualquier duda, no dudes en preguntar 

Saludox !

[Delphius]

No es que quiera hacer propaganda, pero hay tos manuales que pueden ser de apoyo para comprender el tema:
Concepto: Herencia
Concepto: Polimorfismo

Para hacerlo sencillo, inherited se emplea cuando se desea invocar el método de la clase Base.

Por ejemplo:
 

delphi

procedure TClaseHija.HacerEsto;
begin
  inherited HacerEsto;
  ....
end;

En este ejemplo, el método HacerEsto de la clase Hija invoca al mismo método de la clase padre. Los puntos suspensivos son para indicar que luego contínua con otras sentencias.

De este modo podemos invocar a cosas de la clase base y luego añadir nuevas cosas, si se necesita.

Override es la cláusula que se añade al final del método sobreescrito en la clase hija. Es una "marca" que requiere el compilador para reconocer que métodos han sido sobreescritos. De otro modo el compilador nos alertará con unos warnings.

Por ejemplo:
 

delphi

TClaseBase = class
public
procedure HacerEsto; virtual;
end;

delphi

TClaseHoja = class(TClaseBase)
public
procedure HacerEsto; override;
end;

Nota como en la clase base se añadió la cláusula virtual. Luego en la clase hija se añade override para indicar que esta lo sobreescribe.

Saludos,

[JoAnCa]

Muchas gracias por sus aclaratorias respuestas

Mas o menos tengo idea de lo que es herencia y polimorfismo, pero cuando lo di en la universidad fue usando C++, nunca lo he aplicado en Delphi

Y ahora ya lo estoy entendiendo en delphi 

[Rolphy Reyes]

Saludos.

Si necesitas más referencia busca el libro de Ian Marteens La Cara Oculta de Delphi 4 en formato pdf; a su vez puedes buscar también el libro de Marco Cantú llamado Essential Pascal en formato pdf.

Esos documentos son gratuitos.

[Faust]

Ya respondí este en el otro Club y fui el primero... por un momento me sentí orgulloso 

No hay pex 

[egostar]

Ya respondí este en el otro Club y fui el primero... por un momento me sentí orgulloso 

No hay pex 

Que bien amigo, ¡¡¡¡¡ sigue participando !!!!!!  , me sonó a juego de azar

Salud OS