Duda con la herencia

[[AgustinOrtu]]

Podes hacerlo como comenta Al, que seria lo correcto y mas recomendable.

En el Form padre:

Código Delphi [-]
  procedure Privilegios; virtual; abstract;

La directiva virual permite que una clase que descienda del padre, pueda sobreescribir el metodo en cuestion, usando la directiva override

Por otro lado la directiva abstract sirve para que la clase en cuestion no deba implementar el metodo. Simplemente esta para "acordarse" de que los hijos deben implementarlo. Un ejemplo seria

Código Delphi [-]
interface

type

  TFormHijo = class(TFormPadre)
  private
    procedure Privilegios; override;
  end;

implementation

{ TFormHijo }

procedure TFormHijo.Privilegios
begin

end;

Si TFormHijo no declara y/o no provee una implementacion para el metodo Privilegios, el programa no compila

Aunque tambien simplemente en cada uno de tus proyectos declaras e implementas el metodo Privilegios y listo, aunque no estarias aprovechando todas las ventajas de la OO.

Saludos

[[Al González]]

Sólo un par de matices.

Se aconseja usar la palabra sobreescribir para overwrite. Mientras que es más apropiado decir redefinir para override, cuando se habla de métodos virtuales.

Y respecto a

Empezado por AgustinOrtu

Si TFormHijo no declara y/o no provee una implementacion para el metodo Privilegios, el programa no compila

En realidad sí compila, pero la aplicación elevará una excepción si se intenta llamar al método abstracto.

Saludos.

[[AgustinOrtu]]

Interesante Al gracias por las aclaraciones!

Yo pensaba que si no se redefinia el metodo en la clase hija, el compilador lanzaria un error de "Unsatisfied forward or external declaration" que es lo que sucede cuando te falta implementar un metodo declarado (por ejemplo)

EDITO: Sere curioso.. existe algun mecanismo para asegurar que la clase hija implemente todos los metodos abstractos, impidiendo la compilacion si faltase alguno?

[mamcx]

Empezado por AgustinOrtu

EDITO: Sere curioso.. existe algun mecanismo para asegurar que la clase hija implemente todos los metodos abstractos, impidiendo la compilacion si faltase alguno?

Existe:

http://stackoverflow.com/questions/6...lass-in-delphi

[[Al González]]

Aquí hay una falta mía:

Empezado por Al González

Se aconseja usar la palabra sobreescribir para overwrite. Mientras que es más apropiado decir redefinir para override, cuando se habla de métodos virtuales.

Sobrescribir lleva una sola e.

[Casimiro Noteví]

Empezado por Al González

Sobrescribir lleva una sola e.

Mejor que sobre y no que falte

[oscjae]

Perdonad porque no he podido responder antes, ya esta solucionado gracias a vosotros.
Saludos!!!