Entwickler-Ecke

Grafische Benutzeroberflächen (VCL & FireMonkey) - TPanel <-> TCustomControl


Aya - Mi 11.09.02 21:13
Titel: TPanel <-> TCustomControl
Hi,

hab mal ne Frage.. ich benutze für fast alle meine Komponenten das TCustomControl.

Jetzt wollte ich mal fragen, wenn ich auf ein TCustomControl in Delphi dann z.B. ein TLabel draulege verschwindet es hinter dem CustomControl... wenn ich meine Kompo von einem TPanel ableite klappt alles super. Kann ich das TCustomControl irgendwie so hinbekommen das es wie das TPanel funktioniert (Also ein Label auf und nicht hinter ihm landet)??

und das ich nich vom TPanel ableite liegt daran, da das TPanel zuviele dinge beinhaltet die ich garnicht brauche/verwenden kann... oder kann ich Propertys auch unterbinden???

Au'revoir,
Aya


Tino - Do 12.09.02 10:34

Hallo,

das tPanel ist ja auch von tCustomControl abgeleitet. Ein Blick in die Sourcen und mir ist folgendes aufgefallen: Im Constructor des tPanel steht das hier:

Quelltext
1:
2:
3:
4:
5:
6:
7:
constructor TCustomPanel.Create(AOwner: TComponent);
begin
  inherited Create(AOwner);
  ControlStyle := [csAcceptsControls, csCaptureMouse, csClickEvents,
    csSetCaption, csOpaque, csDoubleClicks, csReplicatable];
  {...}
end;

Füge mal (wie oben) in Deinen Komponenten csAcceptsControls dem Property ControlStyle hinzu. Vielleicht klappt es ja dann!

Gruß
TINO


Aya - Do 12.09.02 18:10

Danke~~~

hat geklappt *frooi*