Zirkuläre Unit-Referenz umgehen

**sportkeks**

Guten Abend,
Ich weiß nicht mehr weiter ich hoffe hier kann mir jemand helfen.
Es geht um die umgehung von einer Zirkuläre Unit-Referenz.
hier einmal meine Situation:

(Ich weiß das sieht auf den ersten Blick etwas merkwürdig aus, erspart mir aber im Programm selbst eine menge Arbeit.)

zusammenfalten · markieren

Delphi-Quellcode:

			unit Unit1;

interface

uses

  Unit2;

type

  Tclass1=class

    constructor Create(class2:Tclass2);

end;

---

Unit Unit2;

interface

uses

  unit1;

type

  Tclass2=class

    class1:Tclass1;

end;

Ich weiß man kann solche Zirkuläre Unit-Referenzen umgehen indem man die uses unter implementation schreibt. Das bringt mich in diesem Fall aber leider nicht weiter. Gibt es eine andere Möglichkeit die mir helfen könnte ?

Irgendwie muss das doch gehen

Schonmal vielen Dank im Vorraus, ich bin für jeden Rat dankbar

Zirkuläre Unit-Referenz umgehen

Zirkuläre Unit-Referenz umgehen

Forumregeln