Einzelnen Beitrag anzeigen

Der schöne Günther

Registriert seit: 6. Mär 2013
6.110 Beiträge
 
Delphi 10 Seattle Enterprise
 
#1

Ausführung eines Klassendestruktors OS-abhängig?

  Alt 24. Mär 2014, 12:47
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?

Geändert von Der schöne Günther (24. Mär 2014 um 12:47 Uhr) Grund: Der Titel hat nun ein Fragezeichen am Schluss. Ich hoffe euch damit zusätzliches Lesevergnügen bereitet zu haben.
  Mit Zitat antworten Zitat