Fenster erstellt bzw. sichtbar !?

[dor557]

Zitat von uwewo:

Falls Du Daten aus dem Form auslesen möchtest, solltest Du es vor Release und NIL tun.

Wenn es Dir um verschiedene Instanzen der Form geht, verwende doch einfach MDIChilds!
Damit könntest Du ein zweites Form öffnen und nach dem auslesen das erste schliessen.

Der entscheidende Tipp kam nun MDIChilds

Ich hatte das Formular sowiso schon als MDIChild gesetzt, nur noch nicht die Ganzen Möglichkeiten entdeckt. Bzw gewusst wo ansetzen.

Nun habe ich das Folgender massen gelöst :

Delphi-Quellcode:

   MainForm.RichEdit1.Lines.Clear;
   MainForm.RichEdit1.text := ParamBlobToStr(lpData);
   if not (length(MainForm.RichEdit1.Lines[0]) > 1) then
   begin
     MainForm.RichEdit1.Lines.Add(ParamStr(1));
   end;
   if (length(MainForm.RichEdit1.lines[0]) > 2) then
   with MainForm do
   begin
     XMLopenF.FileName := MainForm.RichEdit1.Lines[0];
     AuswahlPanel.Visible := false;
     if MDIChildCount > 0 then
       for i:=0 to MDIChildCount - 1 do
         MDIChildren[i].Close;
      xmlDatenF := TxmlDatenF.create(MainForm);
      xmlDatenF.Show;
   end;

So habe ich auch keine Fehlermeldungen mehr.

Mal eine Frage bezüglich dem Befehl Tform.Create....

Mein Alter Herr hatte damals immer mit Create(self) gearbeitet...

Das das nicht egal ist weiss ich aber in wie weit beeinflusst das den verlauf des Programmes wenn ich anstatt create(Application) dann Create(MainForm) mache oder hat das keine direkte Bedeutung ??

Aber sinnvoller ist es denke ich alle Male... oder ist das sogar bei einer MDI Anwendung vorraussetzung ??

Gruss Sascha

[Hansa]

Warum verwendet ihr immer das Application ?

Warum nicht so :

  frm := Tfrm.Create (Self); Natürlich unter Optionen "Form automatisch erzeugen" ausschalten. Jetzt ist die Form da. Damit sie wieder sauber verschwindet im FormClose noch CloseAction auf caFree setzen. Für mehrere Instanzen eben die Form-Namen durchnummerieren. Mit FindComponent etc.

Auf den roten Kasten ist kein Verlass. Wer ist Dein alter Herr ? Der sagt zumindest sinngemäß dasselbe wie ich. Das mit dem MDI sind allenfalls Randeffekte.

[dor557]

Gegenfrage :

Warum Self ?? Was bewirkt es ??

Gruss Sascha

[Hansa]

Gegenfrage von mir : geht Deine F1-Taste nicht ?

Application ist so ziemlich das globalste, was es gibt. Da wurde vor längerem aus gutem Grunde die Sichtbarkeit vermindert, private usw. eingeführt und was wird benutzt ? Das was dermaßen global ist, daß es buchstäblich an jeder Ecke verbogen werden kann. Dabei ist das nur in Ausnahmefällen nötig, z.B. wenn unbedingt Spaghetti-Code hergestellt werden muss.

[Muetze1]

Zusammenfassung des Threads:

1. Wenn du Release aufrufst, dann setzt dieses deine globale Variable der Form nicht auf NIL zurück und deine nächsten Abfragen auf Nil sagen, dass die Instanz existiert (da eine alte Adresse drin steht in der Variablen) und damit rufst eine tote Instanz auf.
2. Self ist die Instanz der Klasse in der du dich gerade befindest. Wenn du nun eine Form instanziierst und Self als Owner übergibst, dann wird das Formular bei der Freigabe deines Formulars (wo du es erstellst) mit freigegeben. Bei Application, wenn diese beendet wird. Bei letzterem kann es aber zu Problemen kommen: Ich habe es in meiner App nun grundsätzlich unterlassen Dialoge und andere Formulare (bis auf die MainForm) mit dem Application anzulegen, da es beim Schliessen der Applikation sehr oft zu Abstürzen kam. Grund dafür war einfach nur, dass TApplication die Formulare in einer (zufälligen) Reihenfolge abräumt wo dann Formulare nicht mehr existieren obwohl sie früher/später als andere Formulare gebaut wurden. Wenn ein Formular in einer anderen Klasse instaziiert wurde und an der gleichen Stelle beim abräumen des "Parents" auch wieder freigegeben wurde, dann knallte es deftig mit Application als Owner.

[dor557]

Danke für die ganzen antworten.

Haben mir sehr geholfen !

Gruss Sascha