AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren

Im Class Destructor alle Strings leer

Ein Thema von Björn Ole · begonnen am 2. Aug 2011 · letzter Beitrag vom 3. Aug 2011
 
Benutzerbild von Björn Ole
Björn Ole

Registriert seit: 10. Jul 2008
166 Beiträge
 
Delphi XE Professional
 
#1

Im Class Destructor alle Strings leer

  Alt 2. Aug 2011, 01:55
Ist wahrscheinlich einfach nur zu spät für mich, aber ich kann sonst nicht einschlafen.
Folgende Klasse:
Delphi-Quellcode:
TStatic = class
private
  class var FInt: integer;
  class var FStr: string;
  class constructor Create;
  class destructor Destroy;
public
  class procedure ShowMe;
end;
Und folgende Anwendung mit einem TButton auf dem Formular:
Delphi-Quellcode:
{ TForm1 }

procedure TForm1.Button1Click(Sender: TObject);
begin
  TStatic.ShowMe; // Ausgabe: "7Hallo" - GUT!
end;

{ TStatic }

class constructor TStatic.Create;
begin
  FStr := 'Hallo';
  FInt := 7;
  TStatic.ShowMe; // Ausgabe: "7Hallo" - GUT!
end;

class destructor TStatic.Destroy;
begin
  TStatic.ShowMe; // Ausgabe: "7 " - WARUM?
end;

class procedure TStatic.ShowMe;
begin
  ShowMessage(IntToStr(FInt) + FStr);
end;
Es kompiliert und gibt keine Warnungen, aber warum kennt der Destruktor meinen String nicht mehr und wie kann ich korrekt auf ihn zugreifen?

Geändert von Björn Ole ( 2. Aug 2011 um 01:58 Uhr)
  Mit Zitat antworten Zitat
 

Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 20:13 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz