Problem mit verschiedenen Forms

[himitsu]

Es wurde nur verschoben und nichts wurde abgesplittet oder gelöscht,
also nichts ist weg und alles nun hier.

In "Fragen / Anregungen zur DP" geht es um das Forum selbst.

[DomPerle]

So, habe mein Problem wiedergefunden.
Ich habe jetzt das Problem so gelöst:

procedure TForm1.DeckelClick(Sender: TObject);
begin
If Form4 <> Nil Then
Form4.Destroy;

Form4 := TForm4.Create( Self );
Form4.Show;
end;

Der Versuch Form3 und/oder Form4 beim CreateForm1 zu schließen bringt einen AccessViolation. Warum, ist mir noch nicht ganz klar.
So wird auf jeden Fall beim DeckelClick die unit4 immer neu gestartet und die Form4 ist auch immer nur ein mal vorhande.
Danke für alles

[hoika]

Hallo,
wenn du die Variable nicht auf Nil setzt, ist Sie natürlich nicht Nil.

Delphi-Quellcode:

If Form4 <> Nil Then
begin
  Form4.Destroy;

  Form4:= Nil;      <<-- Warum nicht einfach so?
end;

[himitsu]

Abgesehn davon, dass man TObject.Destroy im Normalfall nicht direkt aufrufen soll,

warum nicht FreeAndNil?
Denn wenn es bei der Freigabe (im Destructor) knallt, dann gibt Delphi den Speicher dennoch frei, aber die Variable ist nicht nil.

[DomPerle]

Danke für den Tipp, ich habe ihn befolgt.