Einzelnen Beitrag anzeigen

LuckyLucas
(Gast)

n/a Beiträge
 
#1

"übergeordnetes" Object ansprechen

  Alt 28. Okt 2005, 23:02
Heyho,

also: Ich habe eine Unit mit einer Klasse. Diese besitzt die Property einer Klasse, die ich in einer anderen Unit untergebracht habe. Nun möchte ich in der "zweiten" Klasse in einer Procedure auf eine Property einer Instanz der "ersten" Klasse zugreifen. Wie tue ich das? U.a. gibt es dann irgendwie Problem mit zirkuläre Referenz... Bsp. (was ich möchte):

"UnitBaum":
Delphi-Quellcode:
uses
  UnitAst
type TBaum=class(TObject)
  public
    property EinAst: TAst;
    property Baum_hat_Schaden: boolean;
...
"UnitAst":
Delphi-Quellcode:
uses
  UnitBaum // ???
type TAst=class(TObject)
  public
    procedure Ast_abbrechen;
...
  procedure TAst.Ast_abbrechen;
  begin
    Breche_Ast_ab;
    MyBaum.Baum_hat_Schaden := true;
  end;
...
Und in meiner MainUnit create ich ein Object von TBaum (MyBaum), sodass ich dann aus der MainUnit heraus nur "Ast_abbrechen" aufrufen brauche, und nicht noch zusätzlich für ein Object von TBaum extra "MyBaum.Baum_hat_Schaden := true" aufrufen muss. Ist praktisch ein Ereignis auf "Ast_abbrechen" ???

Ist das einigermaßen verständlich, wo ich nicht so durchsehe? Da ich selber grad nich so durchsehe, kanns auch sehr unverständlich sein
  Mit Zitat antworten Zitat