Einzelnen Beitrag anzeigen

Benutzerbild von glunzl
glunzl

Registriert seit: 21. Mär 2004
Ort: Reinbek
119 Beiträge
 
Delphi 7 Professional
 
#1

Zugriffsverletzung beim Create

  Alt 2. Jul 2004, 22:10
N'Abend Leutz!

Irgendwie steh ich auf dem Schlauch ...

Ich habe eine Klasse Deklariert, aber wenn ich sie mit dem Button1.Click Ereignis erzeugen will kommt es zu einer EAccessViolation Exception ... Nur warum?

Hier mal der Code ...

Delphi-Quellcode:
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

type
 TMyClass = class(TObject)
   private
     f_test : integer ;
     function Get_f_test : integer ;
   public
     property test : integer read Get_f_test ;
end ;

var
  Form1: TForm1;

implementation

{$R *.dfm}

var
  x : TMyClass ;

function TMyClass.Get_f_test: integer ;
begin
   result := f_test ;
end ;


procedure TForm1.Button1Click(Sender: TObject);
begin
 x.Create ;
end;

end.
Michael
  Mit Zitat antworten Zitat