Ausführung eines Klassendestruktors OS-abhängig?

[Der schöne Günther]

Chaos und Verwirrung. Meine Welt ist normalerweise so klein, dass sich sowohl Entwicklung als auch Auslieferung auf Windows 7 vollzieht.

Ausnahmsweise musste nun etwas noch auf Windows XP laufen. Und ich muss schockiert feststellen: Der Klassendestruktor wird nicht ausgeführt.

Gegeben sei

Delphi-Quellcode:

  TMySingleton = class
     class destructor Destroy();
     class constructor Create();
  end;

und

Delphi-Quellcode:

class constructor TMySingleton.Create();
begin
   ShowMessage('Das ist der Klassenkonstruktor');
end;

class destructor TMySingleton.Destroy();
begin
   ShowMessage('Das ist der Klassendestruktor');
end;

initialization
   Winapi.Windows.MessageBox(0, 'initialization', '', 0);

finalization
   Winapi.Windows.MessageBox(0, 'finalization', '', 0);

Auf Windows 7 wird alles wie erwartet ausgeführt:

1. Das ist der Klassenkonstruktor
2. initialization
3. (...)
4. finalization
5. Das ist der Klassendestruktor

Auf Windows XP:

1. Das ist der Klassenkonstruktor
2. initialization
3. (...)
4. finalization

Warum ist das so? Das kann doch nicht gewollt sein? Wie verhält sich das auf iOS, Android und Mac?

[Stevie]

Sicher, dass in deinem Programm auf XP auch die Klasse irgendwo referenziert wird? Ist das nicht der Fall, dann werden auch Klassen Konstruktor/Destruktor nicht ausgeführt (das ist der schöne Unterschied zum initialization/finalization Block)

Edit: Vergisses - der Konstruktor wurde ja ausgeführt... hmmm

Hast du mal eine andere Form des "Logging" benutzt? Hast du mal mit einem Stoppunkt im Destruktor debuggt?

P.S. Eeeek, Singleton!

[Daniel]

Kann es sein, dass sich Deine App mit ihren MessageBoxen verheddert? MessageBoxen im Finalization-Abschnitt waren meines Wissens noch nie eine gute Idee.
Ich habe eben mit Delphi XE5 eine Konsolen-Anwendung geschrieben und die jeweiligen Code-Stellen eine Ausgabe mit WriteLn() erzeugen lassen.
Klappt unter Windows 8.1 ebenso wie unter Windows XP völlig korrekt auf die erwartete Weise.

[Der schöne Günther]

Ja, in einer Konsolen-Anwendung mit WriteLn(..) klappt es auf allen Systemen wie erwartet. Komisch.

In meinem konkreten Fall waren es natürlich keine Messageboxen, sondern das abschließende Schreiben der Einstellungen beim Beenden der Anwendung. Auf dem XP-Rechner wurde die Datei noch nicht einmal angelegt (TIniFile.UpdateFile() )

Ich hätte auch grade auf einer XP VM schwören können, die Klassendestruktor-Messagebox einmal kurz aufblitzen zu sehen. Ich habe keinen XP-Rechner mit RAD Studio zur Hand und mit Remote Debugging habe ich auch keine Erfahrung. Deshalb kann ich hier nur so amateurhafte Beobachtungen machen

Wo könnte ich denn anfangen zu suchen, woran es liegt?


PS: Füge ich in meiner VCL-Anwendung ein OutputDebugString(Text: PChar) hinzu, kann man das mit Tools wie DebugView noch sehen.

Mein Titel ist also falsch: Der Klassen-Destruktor wird sehr wohl ausgeführt, aber anscheinend funktioniert die Hälfte darin (Messageboxen, Dateioperationen) nicht mehr vernünftig. Oder er zieht sich selbst nach ein paar Millisekunden den Boden unter den Füßen weg. Ich weiß es nicht.

Gibt es allgemeine Richtlinien, was man dort noch tun darf?

[Stevie]

Eventuell liegt das daran (dass der nach allen finalizations läuft), dass du manche Sachen nicht mehr korrekt ausführen kannst.

[JamesTKirk]

Zitat von Stevie:

Eventuell liegt das daran (dass der nach allen finalizations läuft), dass du manche Sachen nicht mehr korrekt ausführen kannst.

Class Destruktoren laufen nicht nach allen finalization Sections. Alle Units werden in umgekehrter Reihenfolge zur Initialisierung finalisiert und innerhalb jeder Unit ist die Reihenfolge der Finalisierung dann:

• Finalization Section
• Class Destructors
• Finalisierung von Variablen, Konstanten, etc.

(steht übrigens auch nirgends in deiner verlinkten Antwort, dass Class Destruktoren nach allen Finalisierungen laufen)

Gruß,
Sven