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?

[DeddyH]

Deine Property ist ja auch ReadOnly, Du wirst also einen Setter schreiben müssen.

[dkoehler]

Zitat von DeddyH:

Deine Property ist ja auch ReadOnly, Du wirst also einen Setter schreiben müssen.

Die Property soll ja auch nicht verändert werden, sie soll nur referenziert werden können.

[DeddyH]

Achso, sry, ich hatte das andersherum verstanden. Ich glaube nicht, dass das geht, da AFAIK Delphi nur die Komponenten vom entsprechenden Typ listet, die auch published sind.