Einzelnen Beitrag anzeigen

xaromz

Registriert seit: 18. Mär 2005
1.682 Beiträge
 
Delphi 2006 Enterprise
 
#2

Re: "übergeordnetes" Object ansprechen

  Alt 28. Okt 2005, 23:35
Hallo,

für Dein Problem gibt es eigentlich nur drei Möglichkeiten.
Erstens: Du packst alles in eine Unit.
Zweitens: Du deklarierst das Ganze so:
Delphi-Quellcode:
unit
  UnitAst;

type TAst=class(TObject)
  public
    MyBaum: TObject;
    procedure Ast_abbrechen;
...

implementation

uses
  UnitBaum;

  procedure TAst.Ast_abbrechen;
  begin
    Breche_Ast_ab;
    TBaum(MyBaum).Baum_hat_Schaden := true;
  end;
Drittens: Du entwirfst Deine Objekte als Interfaces und deklarierst beide in einer Datei (das läuft dann auf eine Art Header-File hinaus: Deklaration und Implementierung in verschiedenen Dateien). So kannst Du die beiden Objekte in getrennten Unit belassen und greifst nur noch über die Deklaration darauf zu.

Gruß
xaromz
  Mit Zitat antworten Zitat