Eigener Komponente eine andere Komponente zuweisen???

[romber]

Hallo!

Sorry für den blöden Titel, aber mir ist nichts anderes aufgefallen...
Ich bastle mir eine eingene Komponente, einen PagingNavigator für die Datenbankabfragen. Das ganze logische Zusammenspiel der visuellen Teile und Eingenschaften habe ich bereits fertig. Nun muss ich das Wichtigste implementieren: die Kommunikation mit der Datenbank. Dafür möchte in meiner Komponente zusätzliche Eigenschaft publizieren, der einen TADOQuery zugewiesen werden soll, damit das ganze funktioniert. Dabei soll meine Komponente aber keine neue TADOQuery erstellen, sondern mit der zugewiesener ADO-Komponente arbeiten. Die zugewiesene ADO-Komponente muss auch nicht freigegeben werden, wenn meine Komponente gelöscht wird. Und genau hier kommt die Frage, wie ich es am besten mache. Bis jetzt habe ich keine Komponenten erstellt, den noch bestehende Komponenten als Eigenschaften zugewiesen werden mussten.

Ich versuche es so, bekomme aber die AV, sobald ich die Eigenschaft dann im IDE zuwesien möchte:

Delphi-Quellcode:

type
  TPagingNavigator = class(TPanel)
  private
    FADOQuery: TADOQuery;
    ...
    procedure SetADOQuery(const AADOQuery: TADOQuery);
  public
    constructor Create(AOwner: TComponent); override;
    destructor Destroy; override;
    ...
  published
    property ADOQuery: TADOQuery read FADOQuery write SetADOQuery;
    ...
end;

procedure TPagingNavigator.SetADOQuery(const AADOQuery: TADOQuery);
begin
  FADOQuery.Assign(AADOQuery);
end;

Was mache ich falsch und wie mache ich es richtig?