FTP | CCD | Buscar | Trucos | Trabajo | Foros |
#4
|
|||
|
|||
repregunto a ver si se entiende
a ver si puedo ser mas claro y concreto, el tema es asi
tengo un metodo en la clase A procedure A.metodoA //es virtual begin //codigo para realizar la actividad 1 end; luego en una clase que hereda de A, llamemosle B tengo una redefinicion de metodoA: procedure B.metodoA //es override begin //codigo para realizar la actividad 2 end; bien ahora lo que yo quiero es que B.metodoA antes de hacer lo que le corresponda, invoque de alguna manera a A.metodoA para obtener la ejecucion: actividad 1 actividad 2 Como soluciones brutas habia pensado en: procedure B.metodoA //es override begin //codigo para realizar la actividad 1 //lo estoy repitiendo!!! //codigo para realizar la actividad 2 end; o Uses A; procedure B.metodoA //es override begin A.metodoA //codigo para realizar la actividad 2 end; pero no me parece un buen uso de la POO hacerlo de esta manera; lo que yo se es que en otros lenguajes yo podria hacer procedure B.metodoA //es override begin super; //aqui se ejecuta el metodo padre, o sea A.metodoA //codigo para realizar la actividad 2 end; pero en delphi no se si se puede; había pensado q inherited era equivalente a super, pero no me resultó... espero se haya entendido lo q quiero preguntar saludos a todos gabriel |
Herramientas | Buscar en Tema |
Desplegado | |
|
|
|