AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Unterkategorien bei Komponenten

Ein Thema von s.h.a.r.k · begonnen am 25. Nov 2005 · letzter Beitrag vom 25. Nov 2005
Antwort Antwort
Benutzerbild von s.h.a.r.k
s.h.a.r.k

Registriert seit: 26. Mai 2004
3.159 Beiträge
 
#1

Re: Unterkategorien bei Komponenten

  Alt 25. Nov 2005, 11:15
Hey!
Mein Kollege hat grad ein Delphi 5 Kochbuch (oder wie das heißt) aufgetrieben und da stand die Lösnug meines Problems exakt drin:

Delphi-Quellcode:
type
  class TAnything = class
    private
      FInt1, FInt2: integer;
      FStr: string;
    published
      property Int1: integer read FInt1 write FInt1;
      property Int2: integer read FInt2 write FInt2;
      property Str: string read FStr write FStr;
  end;
     
  TMyControl = class(TComponent)
    private
      FTest: TAnything;
    public
      constructor Create(AOwner: TComponent); override;
      destructor Destroy;
    published
      property Test: TAnything read FTest write FTest;
  end;

...
implementation
...

constructor TMyControl.Create(AOwner: TComponent); override;
begin
  inherited Create(AOwner);
  FTest := TAnything.Create;
end;

destructor TMyControl.Destroy;
begin
  FTest.Free;
  inherited Destroy;
end;
Also so hat es bei mir funktioniert. Ich hoffe ich, dass ich keinen Schreibfehler drin hab, da ich auf diesem Rechner hier leider kein Delphi hab. Somit sind alle Angaben ohne Gewehr
»Remember, the future maintainer is the person you should be writing code for, not the compiler.« (Nick Hodges)
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 22:18 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz