Bei einer Komponente ein Panel zwischenschalten

[blackdrake]

Hat jemand eine Idee, wie man den/die Fehler beheben oder das ganze etwas optimieren könnte?

[jaenicke]

Überlege einmal was du da machst...

Delphi-Quellcode:

  Panel := TPanel.Create(Self);

  inherited Create(Panel);

Du erstellst ein Panel, das deiner Komponente gehört, und danach sagst du, dass die Komponente dem Panel gehört...

Was passiert jetzt beim inherited? Kurz gesagt wird dem Panel als Besitzer gesagt, dass deine Komponente hinzugefügt werden soll. Die dafür aufgerufene Methode wiederum informiert das Panel per Notification darüber, dass dies passiert ist.

Diese Notification wird dann an alle untergeordneten Komponenten weitergeleitet. Dazu gehört auch deine Komponente. Diese wiederum leitet das wiederum an alle untergeordneten Komponenten weiter, wozu das Panel gehört. Und schon hast du einen StackOverflow...

Wie wäre es, wenn du das Panel der übergeordneten Komponente hinzufügst?

Delphi-Quellcode:

  Panel := TPanel.Create(AOwner);

  inherited Create(Panel);

[blackdrake]

Oh, da habe ich wohl was falsch gelesen. Vielen Dank, jetzt funktioniert es auch.