Hallo Community,
ich habe da ein kleines Problem und weiß nicht so recht, wie ich dieses umgehen kann.
Gegeben sind exemplarisch 2 Units, welche jeweils eine Klasse "besitzen". Nun ist eine Klasse jeweils von der anderen Abhängig, d.h. es muss bei den Methoden immer die Instanz der anderen Klasse übergeben werden.
Delphi-Quellcode:
unit BeispielUnit1;
interface
uses
BeispielUnit2;
type
Klasse1 =
class(TObject)
private
[...]
public
procedure TestProc(Klasse2: TKlasse2);
end;
(* ************************************************** *)
unit BeispielUnit2;
interface
uses
BeispielUnit1;
type
Klasse2 =
class(TObject)
private
[...]
public
procedure TestProc(Klasse1: TKlasse1);
end
Natürlich bekomme ich jetzt einen Fehler ("Überkreuzender Bezug zweier Units ...").
Wie kann ich das jetzt umgehen? Ich dachte da an eine zentrale
Handle-Klasse, welche Pointer auf die Klassen speichert. Kennt ihr was besseres?
Danke im Voraus.