Eigene Komponente: property mit verschiedenen Typen

[Weazy]

Ich habe soeben mit der Komponenten Entwicklung angefangen. Das funktioniert ja auch schon ganz gut, doch wie kann ich ein property hinzufügen, welches z.B strings, integers und ein paar booleans beinhaltet?

Delphi-Quellcode:

type
  TMeinKomponent = class(TComponent)
  private
    fFilename:string;
    fReady:boolean;
  protected
  public
    constructor Create(AOwner: TComponent); override;
    destructor Destroy; override;
  published
    property Filename:string read fFilename;
    property Ready:boolean read fReady;
end;

[mkinzler]

Verwende Subclassing.

[Weazy]

sähe das dann etwa so aus?

Delphi-Quellcode:

type 
  TMeinProperty= class
  private 
    fA:string; 
    fB:boolean; 
    fC:integer
  protected 
  public 
  published 
    property A: string read fA write fA; 
    property B: boolean read fB write fB; 
    property C: integer read fC write fC;
end;

type 
  TMeinKomponent = class(TComponent) 
  private 
    fFilename:string; 
    fReady:boolean; 
    fSpezial:TMeinProperty
  protected 
  public 
    constructor Create(AOwner: TComponent); override; 
    destructor Destroy; override; 
  published 
    property Filename:string read fFilename; 
    property Ready:boolean read fReady;
    property Spezial:TMeinProperty read fSpezial write fSpezial; 
end;

[cruiser]

fast.. du musst von TPersistant ableiten

und natürlich: im Constructor initiieren und im Destructor freigeben

[Weazy]

was meinst du genau mit initieren und frei geben?

[cruiser]

Im Constructor von TMeinKomponent ein:

Delphi-Quellcode:

fSpezial := TMeinProperty.Create;

und im Destructor die Ressourcen freigeben:

Delphi-Quellcode:

FreeAndNil(fSpezial);

[Weazy]

und was muss ich bei meiner propertyclass bei create einfügen?

[cruiser]

Müssen musst du nix... die Defaultwerte wären gut, aber sonst ist dir da freie hand gelassen. Ist im Grunde ja nur ein Konstrukt um Properties zu verschachteln.

[stahli]

Im Constructor solltest Du noch angeben:

fSpezial := TMeinProperty.Create;
fSpezial.SetSubComponent(True); // !!!

damit die IDE Deine Einstellungen aus dem Objektinspektor auch dauerhaft speichert...

Stahli

[Weazy]

Danke!!! Jetzt funktioniert entlich alles!!! :-)