Frage zu Lösungsmöglichkeiten bei Kreuzverweis von Units

[mkinzler]

So sollte es funktionieren

Delphi-Quellcode:

unit uKnotEdge;

interface

type

  TEdge = class;

  TKnot = class(TObject)
  private
    Next: TKnot;
    Edge: TEdge; // [Fehler] uKnotEdge.pas(9): Undefinierter Bezeichner: 'TEdge'
    Data: String;
    ...
  public
    ...
  end;

  TEdge = class(TObject)
  private
    ToAd  : TKnot;
    Next  : TEdge;
    Weight: Integer;
  public
    ...
  end;

implementation

...