[delphi.com.ar]

Código Delphi [-]
type
  TPadre = class
  protected
    Atributo: Integer;
  end;

  THijo = class(TPadre)
  public
    constructor Create;
  end;


{ THijo }

constructor THijo.Create;
begin
  Atributo := 1;
end;

¿Algo similar a esto estas haciendo?