Objektinspektor: Interne Komponente für andere Komponenten zugänglich machen?

[dkoehler]

Ich habe einen Wrapper für eine TQuery geschrieben. Das Grundgerüst sieht so aus:

Delphi-Quellcode:

type
  TMyQuery = class(TComponent)
  private
    FQuery: TQuery;
    function GetDataSet: TDataSet;
  published
  public
    constructor Create(AOwner: TComponent); override;
    destructor  Destroy; override;
  published
    property DataSet: TDataSet read GetDataSet;
  end;

procedure Register;

Ich würde nun gerne zur Entwurfszeit ein entsprechendes TMyQuery Objekt mit einem TDataSource Objekt verbinden. Zur Laufzeit geht das einfach mittels:

Code:

DataSource.DataSet := MyQuery.DataSet;

Wenn ich aber versuche, zur Entwurfszeit im Objekt-Inspektor in die DataSource.DataSet Eigenschaft "MyQuery.DataSet" zu schreiben, erhalte ich eine "Invalid property error" Fehlermeldung. Gibt es eine Möglichkeit die TMyQuery.DataSet Eigenschaft zu registrieren, so daß sie im Objektinspektor in der Drop-Down-Liste der TDataSource.DataSet Eigenschaft erscheint?