Delphi: Zugriffsverletzung am Ende des Create () -Konstruktors

Ich habe eine sehr einfache und einfache Klasse wie diese:

Unit Loader;

interface

uses
  Vcl.Dialogs;

type
  TLoader = Class(TObject)
  published
      constructor Create();
  end;

implementation

{ TLoader }    
constructor TLoader.Create;
begin
   ShowMessage('ok');

end;

end.

Und von Form1 nenne ich es so:

procedure TForm1.Button1Click(Sender: TObject);
var
 the : TLoader;
begin
  the := the.Create;
end;

Jetzt gleich nach demthe := the.Create Teil zeigt Delphi die Nachricht mit'ok' und gibt mir dann einen fehler und sagtProject Project1.exe raised exception class $C0000005 with message 'access violation at 0x0040559d: read of address 0xffffffe4'.

Es zeigt auch diese Zeile:

constructor TLoader.Create;
begin
   ShowMessage('ok');

end; // <-------- THIS LINE IS MARKED AFTER THE ERROR.

Ich bin neu bei Delphi. Ich verwende Delphi XE2 und konnte diesen Fehler nicht beheben. Zeigt mir jemand einen Weg oder hat jemand eine Lösung dafür?

Antworten auf die Frage(2)

Ihre Antwort auf die Frage