Foros Club Delphi - que tan "privada" es la declaracion private de delphi?

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)

- - que tan "privada" es la declaracion private de delphi? (https://www.clubdelphi.com/foros/showthread.php?t=84882)

que tan "privada" es la declaracion private de delphi?

Hola amigos tengo una duda, ultimamente me he puesto a indigar en la programacion orientada a objetos practicando con delphi y con C#, sin embargo encontré algo en delphi que me parecio curioso.

Cuando yo declaro en una clase algún dato de tipo privado, al instanciar esta clase me doy cuenta que tengo acceso todavia a la variable como si fuese publica. Este comportamiento no pasa con C#. Hasta donde yo tengo entendido la declaracion de las variables privadas son de uso exclusivo para la clase donde se encuentra definida.

Anexo un ejemplo:

Código:

  Tperro = class(tobject)

  private

    nombre : string;

  public

    raza   : string;

  end;

.....

Código:

procedure TForm1.Button1Click(Sender: TObject);

var

  perro : Tperro;

begin

  perro := Tperro.Create;

  // Deberia realmente tener acceso a nombre

  // que es privado????

  perro.nombre := 'Firu';

end;

Entiendo que si yo creo otra clase que herede de Tperro, la instancia de la clase hijo no va a acceder a las variables privadas del padre.

Pero creo yo que en el ejemplo que coloque se corre el riesgo de que de repente alguien me instancie a la clase TPerro y use la variable "nombre" la cual no me interesa que usen.

Gracias por sus comentarios!

Hola,

Si no me equivoco ese comportamiento sólo ocurre si las clases en cuestión se declaran en la misma unidad, no si las clases están declaradas en unidades diferentes. Por lo demás no sé hasta qué punto funciona en "runtime", es decir, igual el editor te deja ver los miembros privados en "tiempo de diseño", pero, no recuerdo si dichos miembros siguen siendo inaccesibles en tiempo de ejecución. En todo caso creo que lo primero sí que se cumple, es decir, si las clases están en unidades diferentes no se podrá acceder a sus miembros privados: sólo si las clases están en la misma unidad podrá accederse a los miembros privados en dicha unidad.

Esto de la POO es tan extraño para mi que a lo mejor estoy diciendo una tonteria; sin embargo recuerdo haber leido que en las versiones de Delphi posteriores a Delphi.Net el private es realmente private o hay que usar otra declaracion, es cosa de buscar..... :)

Saludos y felices fiestas!!!

Cita:

Empezado por FGarcia

o hay que usar otra declaracion, es cosa de buscar.....

Seguramente te refieres a strict private, esto se utiliza para indicar que los métodos y atributos solamente tendrán visibilidad dentro de la clase que los implementa, es decir, aún las clases que se encuentran en la misma unidad no podrán acceder a ellos.

Cita:

Empezado por Héctor Randolph (Mensaje 470941)

Lo que quiere decir que en Delphi una variable puede ser tan "privada" como quieras que sea :D

Excelente Héctor, no sabía esa declaración. Eso me recuerda que debo leer más la ayuda de Delphi.

Saludos

Muy cierto lo que dices Dec, si en en otra unidad hago referencia a la clase las variables privadas no las puedo acceder. No sabia ese comportamiento de delphi. Igual voy a prestarle atención a la palabra strict que tampoco conocía.

Gracias por sus comentarios. (: