herencia de metodos

[roman]

Código Delphi [-]
type
  A = class
    procedure metodoA; virtual;
  end;

  B= class(A)
    procedure metodoA; override;
  end;

implementation

procedure A.metodoA;
begin
  // atividad 1
end;

procedure B.metodoA;
begin
  inherited; // aquí se realiza actividad 1

  // actividad 2
end;

end.

EDITO:

Por cierto, ya Al González te indicó que inherited es correcto y te pedi que pusieras el mensaje de error completo y la forma exacta en que llamas a inherited y nada de eso pusiste aquí y te limitaste a decir "pero no resultó...". Esto no ayuda a que podamos ayudarte.

// Saludos

[dec]

Hola,

Estoy de acuerdo con Román. De hecho estuve haciendo unas pruebas al respecto de lo que nos ocupa y Román se me adelantó en la respuesta. Ciertamente faltaba información y en tu segundo mensaje sigue faltando. En las pruebas que llevé a cabo podía hacer uso de "inherited" sin problemas, siempre y cuando los métodos fueran "protegidos" ("protected") o "públicos" ("public" o "published").

Si el método "virtual", en este caso, fuera "privado" de la clase "A" no podría hacerse uso de "inherited" a no ser (esto es una particularidad de Delphi) ambas clases estuvieran implementadas en la misma unidad, lo cual parece que no es el caso, puesto que ambas clases son "formularios".

Así que, eso es lo que iba a decir cuando se me adelantó Román pidiendo más información, la cual, efectivamente, faltaba y aun falta para mejor ayudarte, puesto que si fuéramos adivinos otro gallo cantaría, como suele decirse.

[roman]

Empezado por dec

Si el método "virtual", en este caso, fuera "privado" de la clase "A" no podría hacerse uso de "inherited" a no ser (esto es una particularidad de Delphi) ambas clases estuvieran implementadas en la misma unidad

Muy cierto, es el único caso (en la sección private y distinta unidad) que me viene a la mente en donde inherited no funcionaría. Pero en tal caso, el mensaje de error sería:

Method 'metodoA' not found in base class

Nada que ver con un "error de tipos" como se señaló al principio del hilo, así que por ello seguimos sin saber cuál puede ser el problema. Da la impresión de que el error está en otra parte y no tiene que ver con inherited.

// Saludos

[Athanatos]

Finalmente, como va bien en este tema: Mucho cuidado si es el destructor y lo declaras private y luego intentas llamar al destructor padre desde el destructor de una clase que herede de la anterior, por que entonces no te saldra mensaje de error (depende de la version, creo que en las actuales te sale un warning) y el destructor del padre que esta como "private" no sera ejecutado. Por la forma en que reserva memoria delphi no tendras un "memory leak" al terminar de ejecutarse tu programa, asi que lo anterior es especialmente importante si tu aplicacion funciona las 24horas como por ejemplo un servidor de algo.