Klassen, Instanzen, Zeiger, etc allgemeine Frage

[Kroko1999]

Ich würde es so machen:

Delphi-Quellcode:

type
  TNode = class(TObject)
    constructor Create;
    destructur Destroy; override;
  private
    iValue:integer;
    FRNode,
    FLNode: TNode;
    procedure SetLNode (const Value: TNode);
    procedure SetRNode (const Value: TNode);
  public
    LNode: TNode read FLNode write SetLNode;
    RNode: TNode read FRNode write SetRNode;
  end; 

constructor TNode.Create;
begin
  inherited;
  FLNode := TNode.Create;
  FRNode := TNode.Create;
end;

destructor TNode.Destroy;
begin
  FLNode.Free;
  FRNode.Free;
  inherited;
end;

procedure TNode.SetLNode (const Value: TNode);
begin
  // nur die benötigten Eigenschaften übernehmen
  //z.Bsp.
  FLNode.iValue := Value.iValue;
end;

procedure TNode.SetRNode (const Value: TNode);
begin
  //etc.
end;