Form verursacht beim schließen einen Fehler.

[Getox]

Hallo,

Ich bin grade dabei mir ein Programm zu basteln, bei dem ich zum erfassen relevanter Daten ein Form mit Eingabefeldern zur Verfügung stellen muss.

Dieses erstelle ich so:

Delphi-Quellcode:

procedure tClientManager.NewClient;
var
  GUI: tForm3;
begin
  Gui := tForm3.Create(application);
  try
    Gui.fClientmanager := self;
    Gui.ShowModal;
  finally
    Gui.Free;
  end;

Und wenn ich auf das "X" dieser Eingabemaske drücke und auch wenn ich meinen Abbrechen-Button (macht nur "close;") bekomme ich eine Fehlermeldung "Zugriffsverletzung bei Adresse bla in Modul bla"

Hat jemand eine Idee was das sein könnte?

[Klaus01]

Hallo,

Formen die mit showModal geöffnet sind werden in der Regel
mit dem Setzen des modalResults geschlossen.
Du schliesst die Form und gibst sie im Finally nochmals frei.

Grüße
Klaus

[Getox]

Ich hab das Free im finally auskommentiert und der Fehler kommt immer noch.

[Getox]

Kann das daran liegen, dass ich zur selben Zeit 2 Fenster mit Showmodal auf habe?

[Uwe Raabe]

Zitat von Klaus01:

Formen die mit showModal geöffnet sind werden in der Regel
mit dem Setzen des modalResults geschlossen.
Du schliesst die Form und gibst sie im Finally nochmals frei.

Close und Free bei einem Form sind nicht dasselbe. Lediglich wenn das Form im OnClose-Event als Action caFree setzt, wird das Form bei nächster Gelegenheit freigegeben. Ansonsten wird das Form bei einem Close lediglich unsichtbar gemacht, aber nicht freigegeben. Das try-finally mit dem Free ist also eigentlich korrekt.

Der Fehler liegt offensichtlich außerhalb des für uns sichtbaren Codes.

[Uwe Raabe]

Zitat von Getox:

Kann das daran liegen, dass ich zur selben Zeit 2 Fenster mit Showmodal auf habe?

Eigentlich nicht. Ein modales Form kann durchaus ein anderes Form modal aufrufen.

[Getox]

hm... ich hab grad auch noch mal ein komplett leeres Form erstellt und anstelle der normalen Eingabemaske aufgerufen. Auch das kommt der Fehler...

[Mathematiker]

Hallo,
in meiner Hilfe zu "free" steht:

Zitat:

To free a form, call its Release method, which destroys the form and releases the memory allocated for it after all its event handlers and those of the components it contains are through executing.

Zum Schließen einer Form verwende ich immer form1.release und nicht form1.free.

Beste Grüße
Mathematiker

[Bummi]

Auch wenn Du Release immer verwenden kannst, ist es in dem gezeigten Fall nicht nötig (das Problem) da die EventHandler nach dem Showmodal ja "durch" sind.

Release macht nichts anderes als ein PostMessage mit CM_RELEASE aufzurufen, welches dann nach dem abarbeiten der Events Free aufruft.

[Uwe Raabe]

Zitat von Getox:

hm... ich hab grad auch noch mal ein komplett leeres Form erstellt und anstelle der normalen Eingabemaske aufgerufen. Auch das kommt der Fehler...

An welcher Code-Zeile genau kommt denn der Fehler?