Eigene TImage Komponente mit Dataset

[himitsu]

Um welche Delphiversion handelt es sich denn?

So, ich hab grade kurz nachgesehn und getestet.

Ich kann hier nicht direkt auf das "DataSet"-Property zugreifen, aber auf die DataSet-Komonente in dem "DataSet" geht es, wenn da als Owner deren Elternkomponente angegeben ist.

Dort im Property-Editor geht es also nur auf die DFMs und nicht auf die Klassen.

Bei uns sieht es in etwa so aus

Delphi-Quellcode:

type
  TMyImage = class(TImage)
  private
    FDataSet: TDataSet;
  published
    constructor Create(Owner: TComponent); override;
    property DataSet: TDataSet read FDataSet stored False;
  end;

constructor TMyImage.Create(Owner: TComponent);
begin
  inherited;
  FDataSet := TDataSet.Create(Self);
  FDataSet.Name := 'ImageDataSet';
end;

und auf der form liegt ein "MyImage1" rum.

Mit "MyImage1.DataSet" geht es nicht, aber "MyImage1.ImageDataSet" funktioniert.



(Wir haben sogar schon Form/Frame übergreifenden Zugriff und der Propertyeditor bietet uns das auch zur Auswahl an, also wenn die Unit/DFM im selben Package oder zumindestens im Delphi geöffnet ist und natürlich in den Uses drinsteht)