Einzelnen Beitrag anzeigen

Gereon

Registriert seit: 17. Aug 2003
12 Beiträge
 
Delphi 6 Personal
 
#1

2 Klassen, die aufeinander zugreifen - eine Unit? uses?

  Alt 7. Sep 2003, 19:14
Hallo zusammen,

ich habe zwei Units, die gegenseitig aufeinander zugreifen. Nun sollen daraus Klassen mit genau einer Instanz werden (Es soll halt OO sein..). Nun brauchen diese Instanzen aber jeweils eine Referenz auf die andere. Diese wollte ich sinnvollerweise im Konstruktor übergeben, bei der Zweiten sollte sie nachträglich gesetzt werden. Leider klappt das nur in eine Richtung, denn ich brauche jeweils den Typ der anderen Instanz im Interface-Teil für den Konstruktor oder die "Übergabeprozedur".
Das geht aber nicht, weil Delphi keine zirkulären USES - Anweisungen zulässt. Da gibt es zwar den Trick, ein Uses in den Interface-Bereich zu setzen und den zweiten in den Implementierungs-Bereich. Das klappt aber hier nicht.
Andere Lösung: Ich schreibe beides in _eine_ Unit. Nur: Das wird furchtbar unübersichtlich und include-Dateien find ich auch nicht so berauschend, weil man dann ja Interface und Schnittstelle beider Klassen aufspalten muss. Das ist auch nicht sehr übersichtlich.

Stell ich mich nur doof an oder hat noch nie jemand so ein Problem gehabt? In Java kenne ich solche Probleme nicht.

Für jeden Tipp dankbar & kurz vorm Verzweifeln

Gereon
  Mit Zitat antworten Zitat