Eigenschaften von erzeugten Komponenten

[DeddyH]

Du hast ja beim Erzeugen einen Owner angegeben, daher musst Du die Komponenten nicht selbst freigeben, das übernimmt der Owner, das ist nämlich seine Aufgabe.

[Maya]

Also müsste ich die Groupboxen freigeben?
Problem an der Sache ist aber, dass auch wenn ich die Form schließe und sie wieder öffne mit 'ner anderen Auswahl, motzt Delphi-Lein 'rum, weil einige Komponenten schon unter gewisse Namen vorhanden sind. D.h. sie sind nicht freigegeben wurden.

So und um mal meinen Gedankengang zu Ende zu führen: ich müsste die Groupboxen freigeben (sind zweie), wo die LabeledEdits drinne sind und beim neuen OnShow-Ereignis des Fensters neu erzeugen, ja?

[DeddyH]

Der Owner ist das Formular, der Parent dürfte die jeweilige GroupBox sein. Während der Owner sich um den Speicher kümmert ist der Parent für die Darstellung zuständig. Aber das nur am Rande. Willst Du wirklich bei jedem OnShow-Eventaufruf die Komponenten neu erzeugen? Vielleicht wäre es dann einfacher, das Formular dynamisch anzulegen und freizugeben.

[Maya]

Das Formular komplett dynamisch anlegen möchte ich eigentlich nicht, weil es immer komplett gleich aussieht, bis auf die knapp 15 LabeledEdits und max. 6 Comboboxen (je nach Auswahl), welche dynamisch erzeugt werden. Das sind ja auch nicht die einzigen Komponenten auf den Formularen.

Gibt es denn dann nicht eine Möglichkeit, das Formular richtig zu schließen und bei jeden Aufruf neu zu kreiieren, also nicht nur einfach anzuzeigen? Dann wären die Komponenten doch freigegeben und mein Problem eigentlich gelöst.

[DeddyH]

Das meinte ich ja. Du kannst das Formular in den Projektoptionen aus der Liste der automatisch erstellten Formulare entfernen. Dann erzeugst Du es zur Laufzeit und stellst im OnClose die Action auf caFree. Das sollte eigentlich funktionieren, wenn ich nichts vergessen habe.

[Maya]

Ok, das kannte ich noch gar nicht, jetzt hab ich aber ein ganz anderes Problem.
Wie ich ja schon erwähnte, wird vorher eine Auswahl getroffen und je nach dem wird dann das Formular erstellt. D.h. ich übergebe an die Unit frmneuerEintrag eine Variable (1,2 oder 3) und dementsprechend werden dann die Komponenten hingebastelt.

Somit sieht mein Quelltext in dem Auswahlformular wie folgt aus:

Delphi-Quellcode:

procedure TAuswahl.Hausmitteilung1Click(Sender: TObject); 
begin
   Postart:=3; 
   neuer_Eintrag.Postart:=Postart;
   neuer_Eintrag.ShowModal;

Jetzt kommt nämlich immer nach der Auswahl eine Fehlermeldung bzgl. einer Zugriffsverletzung. Ist ja auch klar, wenn das Formular noch gar nicht erzeugt ist, wie soll es da ja auch auf die Variable zugreifen?

[DeddyH]

Delphi-Quellcode:

procedure TAuswahl.Hausmitteilung1Click(Sender: TObject);
begin
   Postart:=3;
   //Formular erzeugen
   neuer_Eintrag := Tneuer_Eintrag.Create(nil);
   neuer_Eintrag.Postart:=Postart;
   neuer_Eintrag.ShowModal;

[Maya]

Ja, ich denke gerne mal viel zu komplizierten. Dachte, ich muss schon wieder tief in die Trickkiste greifen.

Ich wünsche mir einen Danke-Button hier her!

[DeddyH]

Du gibst aber auch hoffentlich das Formular wieder frei (wie gesagt, z.B. über die CloseAction des Formulars im OnClose)?

[Maya]

Also ich hab in dem Formular im OnClose-Ereignis dieses "Action:=caFree;" stehen, keine Sorge. Ich werde mich bloß noch mal etwa genauer mit der CloseAction beschäftigen, aber erst nach meinen langen WE. XD