Herencia

[miguel867]

En la clase padre tengo este constructor:

constructor cl_Socio.create(codigo: integer; nombre: string);
begin
self.codigo_socio := codigo;
self.nombre := nombre;
self.estado := 'socio1';
end;

En la clase hija tengo este constructor

constructor cl_SNoFiable.create(codigo: integer; nombre: string; fecha: tdate);
begin
inherited; // invocacion al create de la clase padre... NO SÉ SI ESTÁ BIEN
self.fecha := fecha; // atributo de la clase hija
self.estado :='SNF1'; // atributo heredado -> en clase padre es protected
end;

Ahora espero haber aclarado bastante.

Saludos!!!