Eigenschaften von erzeugten Komponenten

[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