FormularArray den richtigen Create aufrufen! Wie?

[Jumpy]

Danke.

Kriegs in D6 kompiliert und gestartet, muss aber in den initialization Abschnitten jeweils eines der RegisterClassAlias auskommentieren sonst bekomme ich einen Laufzeitfehler. Siehe Bild. Woran könnte das liegen?

Da ich auch ReportMemoryLeaksOnShutdown := True; auskommentieren musste:
Wenn ich X mal hintereinander so das MainForm erzeuge und dann das vorderste wieder wechsele, werden dann die restlichen alle gelöscht (owner ist ja jeweils angegeben)?

[himitsu]

Es kann nur einen geben.
Es darf immer nur eine Klasse, mit dem selben Namen, zur gleichen Zeit registriert sein.

Nochmal was Gleichnamiges registrieren knallt demnach.

[Sir Rufo]

Bei Delphi6 wird wohl bei RegisterClassAlias der Alias und der Klassenname registriert.

Das machen neuere Delphis nicht mehr. Müsstest du aber im Code (RegisterClassAlias ) nachschauen können.

Ja, die Forms werden ja mit einem Owner erzeugt, und selbst wenn nicht, es wird ja ein Parent angegeben und der würde auch dafür sorgen, dass die Instanz aufgeräumt wird

[himitsu]

Es wird nur über den Owner (Besitzer) freigegeben ... der Parent ist nur für die Darstellung.

Application.CreateForm setzt aber überall den Owner auf die Application, also löscht Application das dann, wenn die Anwendung beendet wird.

[Sir Rufo]

Zitat von himitsu:

Es wird nur über den Owner (Besitzer) freigegeben ... der Parent ist nur für die Darstellung.

Application.CreateForm setzt aber überall den Owner auf die Application, also löscht Application das dann, wenn die Anwendung beendet wird.

Delphi-Quellcode:

LForm := TForm.Create( nil );
LForm.Parent := Panel1;
Panel1.Release;

Und schwupps ist auch die LForm-Instanz futsch

[himitsu]

Ist das ein Sonderfall bei den TCustomForms
oder werden alle TWinControl-Instanzen bei Sowas freigegeben?


OK, wenn das ARC mir nun Objekte unterm Arsch wegklaut, warum dann nicht auch die VCL.


[edit]
Ich dachte bisher eigentlich immer nur, daß bei .Parent nur die Anordnung gilt, das aber nicht für die Freigabe genutzt wird.
Jedenfalls gibt die VCL da selber nirgendwo etwas frei.

Aber wenn ich grade nochmal drüber nachdenke ... joaar, in der WinAPI hängen die nur via Parent zusammen, womöglich wird das dann über WM_DESTROY gelöscht.
Obwohl ich da eigentlich eher davon ausgegangen, daß dann nur Handle (HWND) gelöscht wird, aber die Objektinstanz noch da bleibt.

[Sir Rufo]

Zitat von himitsu:

Ist das ein Sonderfall bei den TCustomForms
oder werden alle TWinControl-Instanzen bei Sowas freigegeben?


OK, wenn das ARC mir nun Objekte unterm Arsch wegklaut, warum dann nicht auch die VCL.

Das ist gefühlt schon immer so gewesen bei TControl
Steht auch so in der Doku zu TControl.Parent

[himitsu]

Zitat von Sir Rufo:

Das ist gefühlt schon immer so gewesen bei TControl

Hatte meine Antwort nochmal überdacht und etwas erweitert.

Innerhalb der VCL gibt es da ja keine Probleme, da sich dort die Referenzen bei Parent, Owner, Controls und Components selber aufräumen.

Hmmm, dann dürfte das ja nun im ARC "richtig" funktionieren?
Solange noch eine externe Referenz existiert, düfte dann das Objekt eigentlich nicht mehr entsorgt werden.

Bei deinem Code würde LForm am Ende ja eine ungültige Referenz enthalten.
(OK, nicht sofort, da Release ja verzögert löscht)

[Jumpy]

Zitat von Sir Rufo:

Bei Delphi6 wird wohl bei RegisterClassAlias der Alias und der Klassenname registriert.

Jo, scheint so zu sein. Hab mich auf TRegGroup.RegisterClassAlias runtergehangelt und da wird RegisterClass aufgerufen und ein FAliasList.AddObject. Da fehlt die Prüfung, ob die Klasse schonmal regisriert ist.

Damit wird RegisterClassAlias aber doch sinnfrei? Oder?

Edit: Ach neh. Ich kann es ja so wenigstens 1x mit einem beliebeigen Alias registrieren und muss nicht den Default Classname wie bei RegisterClass nehmen.