Beim Destroy eines Objektes etw. in der Hauptunit ausführen

[Binärbaum]

Den "überkreuzenden Bezug zweier Units" kannst du verhindern, indem du die Unit im unses im implementation-Abschnitt einbindest. Also etwa so:

Delphi-Quellcode:

unit Unit1;

interface

uses
  SysUtils, Types, Classes, Variants, QTypes, QGraphics, QControls, QForms,
  QDialogs, QStdCtrls;

type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

uses DieBetreffendeUnit;//hier sollte das hin
...

MfG
Binärbaum