Error: Circular unit reference to 'Unit2'

[JM75]

Hola, os habéis explicado bien y os entiendo. Pero si hago eso se me presenta otro problema, en las unidades unit2 y unit3 hay clases que las declaro en la parte "interface" y que tienen atributos de un tipo declarados en las otras unidades, por lo que tengo que hacer referencia a esas unidades en el "uses" de la parte "interface" y no en "implementation".

No se si me he explicado bien o no. En el código del primer mensaje he puesto de manera resumida cómo están declaradas las clases.

Gracias.

[Ñuño Martínez]

Entonces deberías planificarlo de otra forma. Tal vez usando interfaces o moviendo alguna clase a otra unidad nueva. Sin el código concreto es difícil darte una solución para esto.

[JM75]

Hola Ñuño, he intentado mover clases a otras unidades pero ha sido imposible, las declaraciones de las clases que tengo me lo impedían.

Al final lo he resuelto de otra forma. Las variables de la clase de la unidad Unit2 las he declarado del tipo de una clase padre común con el tipo de las clases a las que me interesaba referenciar.

Despúes he referenciado las otras unidades en el "uses" del "implementation" para poder hacer "TClase(Variable)" -creo que se dice "cast"- en el desarrollo de los métodos.

No se si me he explicado.

Gracias por todo.