Fehler beim Programmende nach Erzeugung von Panels

[DeddyH]

Da hilft wohl nur noch Durchsteppen und Ermitteln, was diesen Fehler auslöst. Gibst Du vielleicht irgendwo im Code eins oder mehrere der Panels frei (mit Free statt FreeAndNil)?

[Steve9825679]

Das hab ich schon (öfters!)! Beim Durchsteppen startet das komplette Programm, erst wenn ich das Programm beende, wird der Fehler bei der Zeile "Application.Run" geschmissen. Das sagt mir leider überhaupt nix.

[DeddyH]

Wie schon gefragt: wird irgendwo eine Komponente freigegeben, die einen Owner zugewiesen bekommen hat? Tritt der Fehler auch dann auf, wenn Du eins der Panels einmal nicht erzeugst?

[zeras]

wenn ich die Zeilen lösche, geht es, aber es kommt keine Meldung.

// x.InsertControl(B);
// x.InsertControl(C);

[DeddyH]

Ich bin mir nicht ganz sicher, aber gehört zum jedem InsertControl/InsertComponent nicht auch ein RemoveControl/RemoveComponent? Wobei man sich das ja ganz sparen kann, wenn man gleich den richtigen Owner angibt.

[sx2008]

Zitat von zeras:

wenn ich die Zeilen lösche, geht es, aber es kommt keine Meldung.
// x.InsertControl(B);
// x.InsertControl(C);

Wieso rufst du InsertControl auf?
Durch Setzen des Property Parent ist automatisch definiert wo das erzeugte Control in der Hierarchie aller Controls steht.
Das wäre dann Doppelt-Gemoppelt.
Man sollte übrigens das Property so spät wie möglich setzen; also zuerst die anderen Eigenschaften wie Color, Align,... setzen und dann erst Parent zuweisen.

PS: Finger weg von InsertControl - das wird schon automatisch im Konstruktor durch die Angabe des Owners erledigt!!

[Steve9825679]

Alles klar, danke für deinen Tipp!

[DeddyH]

Nunja, das hatte ich ja bereits 2 mal erwähnt

[Steve9825679]

Nein, es wird keine Komponente nirgends freigegeben (hab ich alles auskommentiert mal), und ja, der Fehler tritt auch dann auf, wenn ich eine der drei Komponenten nicht erzeuge (mit entsprechend modifiziertem Parent dann). Er tritt nur dann nicht auf, wenn ich B UND C nicht erzeuge.

[Steve9825679]

Alles klar, das wars, DANKE euch beiden!
Ich muss

Delphi-Quellcode:

  x.InsertComponent(B);
  x.InsertComponent(C);

verwenden. Die restlichen Inhalte der drei Panels werden dann mit InsertControl (diese Code-Teile hab ich hier nicht gepostet, weil vorher schon rausgefiltert) hinzugefügt.
Danke nochmals!