Delphi - friend ...

Hola a todos:

Mi consulta es si existe la posibilidad en delphi de declarar funciones "friend", es decir, al igual que en C++, una función "friend" es una función que puede acceder a la parte privada de una clase desde fuera de la clase. ¿hay alguna posibilidad de hacer esto en delphi?

Un saludo.

Diego :: beosman

¿Qué sentido tiene entonces la sección private de una clase?... Evidentemente C++ es un lenguaje para #@$%&!

Vamos a ver, por supuesto que la sección private es para algo, pero si en C++ han hecho las funcione s "friend" es por algo, y si yo lo pregunto aquí es porque lo necesito. Y sobre todo se necesita para clases que contienen otras clases. Las clases "hijo" tienen que llamar a un procedimiento de la clase padre pero sólo ellas, por tanto no puede estar en público, pero tampoco en privado porque sino no podrían. Y que quede claro que no son clases derivadas (ya sé para que es protected), son clases que contienen a otras clases. Así que vuelo a hacer la pregunta: ¿existe alguna forma de hacer lo mismo en Delphi que "friend" en C++?

Un saludo a todos.

Diego :: beosman

No, no hay por supuesto, eso rompe con la filosofía OOP.
Algo parecido pero no exacto es la cláusula reintroduced puesta al final de un método pero no funciona exactamente igual que friend.

Creo q ese tipo de funciones existe en C++ por lo de la herenciaz multiple; en Delphi no existe herencia multiple y por tanto no hace falta ese tipo de funciones..