Warum erscheint eine Fehlermeldung?

[himitsu]

Weil du keine Instanz von deinem tDatum erstellt hast!

Ich wundere mich allerdings nur, daß es nicht gleich in "loeschen" knallt.
Welche Delphi/Lazarus-Version nutzt du denn?



PS: Dein datumcheck in setze "checkt" die falschen Werte.

Und der Code in drucke macht nicht das, was einem die Formatierung versucht einzureden.

[Stevie]

Unter Delphi zumindest kann das Programm überhaupt nicht funktionieren.

Du erstellst nämlich an keiner Stelle eine Instanz von TDatum. Und da du eine globale Variable benutzt, welche auf nil initialisiert ist, bekommst du eine Zugriffverletzung in der ersten Zeile der Loeschen Methode. Das sollte der Compiler übrigens mit der Warnung "Variable nicht initialisiert" quittieren.

[ThaiSon96]

Könnt ihr die Mängel bitte etwas genauer erläutern?
Wie oben bereits beschrieben wurde: Das Programm funktioniert.

[Stevie]

Zitat von ThaiSon96:

Könnt ihr die Mängel bitte etwas genauer erläutern?
Wie oben bereits beschrieben wurde: Das Programm funktioniert.

Objekte kann man nicht einfach benutzen, ohne eine Instanz davon zu erstellen, da sonst kein Speicher für die Felder allokiert wurde. Entweder knallt es direkt (wie es hier eigentlich sollte) oder du schreibst wild auf irgendnem Speicher rum - entweder merkst du es nicht, oder du bekommst irgendwann später die Quittung, wie scheinbar in deinem Fall, beim Beenden - ich würde das nicht "funktionieren" nennen

P.S. Du bist uns immer noch die benutzte Delphi Version schuldig - eventuell können wir uns dann das von unseren Erwartungen abweichende Verhalten erklären.

[sx2008]

Eine Instanz erstellen bedeutet in Delphi dass man den Konstruktor, der fast immer Create heisst, explizit aufrufen muss:

Delphi-Quellcode:

var
  heute: tDatum;
  check : string;
begin // Hauptprogramm -------
  heute := tDatum.Create;  // Konstruktor aufrufen, dieser liefert eine neue Instanz (ein Objekt) zurück
  heute.loeschen;
  ...
  // und ganz zum Schluss muß man das Objekt wieder freigeben
  heute.Free;
end;

[Sir Rufo]

Zitat von sx2008:

Eine Instanz erstellen bedeutet in Delphi dass man den Konstruktor, der fast immer Create heisst, explizit aufrufen muss:

Delphi-Quellcode:

var
  heute: tDatum;
  check : string;
begin // Hauptprogramm -------
  heute := tDatum.Create;  // Konstruktor aufrufen, dieser liefert eine neue Instanz (ein Objekt) zurück
  heute.loeschen;
  ...
  // und ganz zum Schluss muß man das Objekt wieder freigeben
  heute.Free;
end;

Korrekterweise erstellt der Konstruktor eine Instanz und liefert eine Referenz zur Instanz (Zeiger auf den Speicherbereich der Instanz) zurück.

[ThaiSon96]

Vielen Dank für die nachvollziehbaren Erklärungen!
Ich habe nochmal meinen Lehrer gefragt und er meinte, dass wir das noch nicht wissen können...
Benutze Delphi 7, aber es hat sich ja erledigt