Einzelnen Beitrag anzeigen

franktron

Registriert seit: 11. Nov 2003
Ort: Oldenburg
1.446 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#1

Zugriffsverletzung bei zuweisung von Self

  Alt 5. Nov 2007, 14:44
Delphi-Quellcode:
//Hier die Klasse
Tonl_kaltermin = class(TPanel)
   private
    Fuserid: Longint;
    Fvon: TDateTime;
    Fbis: TDateTime;
    Ftitle: String;
    procedure Setbis(const Value: TDateTime);
    procedure Setuserid(const Value: Longint);
    procedure Setvon(const Value: TDateTime);
    procedure Settitle(const Value: String);
   public
      { Public-Deklarationen }
      Constructor Create(AOwner: TComponent); override;
      Destructor Destroy; override;
   published
      property von      : TDateTime read Fvon write Setvon;
      property bis      : TDateTime read Fbis write Setbis;
      property userid : Longint read Fuserid write Setuserid;
      property title   : String read Ftitle write Settitle;

      property Width;
      property Height;
      property Top;
      property Left;
      property Visible;
      property Color;
   End;

//Hier der aufruf
FNewtermin:=Tonl_kaltermin.Create(Self);
      FNewtermin.Parent:=Self; <= Hier kommt immer ein Fehler (mit Nil gehts)
      FNewtermin.Color:=clBlack;
      FNewtermin.Left:=x;
      FNewtermin.Top:=y;
Also wenn ich den Code oben ausführe kommt immer eine Zugriffsverletzung 00000 x 00000 u.s.w.

was habe ich falsch gemacht (mit anderen Klassen gehts (z.b. TPainbox) nur mit der nicht mit TPanel gehts auch
Frank
Tux sein Lieblingsquellcode
While anzfische<TuxSatt do begin
Fisch:=TFisch.Create; Tux.EssenFisch(Fisch); Fisch.Free;inc(anzfische); end;
  Mit Zitat antworten Zitat