Problem mit Klasse

[Mussi0]

Hallo zusammen,

ich habe wiedermal ein Problem, ich bin momentan dabei mich ein wenig
mit Objektorientierung auseinander zusetzten.

Ich habe jetzt eine Klasse gebildet mein Problem ist nun dieses das ich damit
nichst anfangen kann leider weiß ich nicht wo ich da den Fehler drin habe.

Delphi-Quellcode:

  TKreis = class
    private
      nX : integer;
      nY : integer;
      nSpeedX : integer;
      nSpeedY : integer;
      procedure SetX(NewX : integer);
      procedure SetY(NewY : integer);
      procedure SetSpeedX(NewSpeed : integer);
      procedure SetSpeedY(NewSpeed : integer);
    public
      property X : integer read nX write SetX;
      property Y : integer read nY write SetY;
      property SpeedX : integer read nSpeedX write SetSpeedX;
      property SpeedY : integer read nSpeedY write SetSpeedY;
      procedure CollisionX;
      procedure CollisionY;
  end;

Ich hoffe das darin der Fehler liegt und mir jmd. sagen kann woran das liegt.

Danke schonmal für die Hilfe

Gruß
Muss!0

[hanselmansel]

Was spuckt Delphi denn für Fehlermeldungen aus?

[Phoenix]

Äh... ja. Da fehlt was ganz Elementares, nämlich der Constructor, mit dem Du aus der Klasse ein Objekt erzeugen kannst.

Edit: Constructor schreibt sich anderst...
Und : Ändere doch bitte kurz noch Deinen Beitrag und nehmen anstelle der [ code ] - Tag den [ delphi ] - Tag. Dann haben wir nämlich auch schöne Farben im Code

[oki]

Hi,

sag mal genau was dein Problem ist und welche Fehlermeldungen du bekommst. Dann setz die proerty's mal nach hinten.

Delphi-Quellcode:

    public
      procedure CollisionX;
      procedure CollisionY;
      property X : integer read nX write SetX;
      property Y : integer read nY write SetY;
      property SpeedX : integer read nSpeedX write SetSpeedX;
      property SpeedY : integer read nSpeedY write SetSpeedY;
  end;

gruß oki

[Mussi0]

also die Fehlermeldung sagt das darin eine Zugriffsverletzung ist der Fehler kommt
um genau zu sein hier:

Delphi-Quellcode:

procedure TKreis.SetY(NewY : integer);
begin
 nY := NewY;
end;

vielleicht habe ich auch da einen Fehler..

Gruß
Muss!0

[Dax]

Zitat von Phoenix:

Äh... ja. Da fehlt was ganz Elementares, nämlich der Construcor, mit dem Du aus der Klasse ein Objekt erzeugen kannst.

Mööp. Der is eher egal, wenn man nicht grad Werte initialisieren will Der TObject-Constructor, auf den alles zurückfällt, krallt sich eh erstmal die InstanceSize der Klasse(wird vom Compiler ermittelt) und holt sich den nötigen Speicher.

Wenn ich mich nicht irre.

Zitat von Mussi0:

also die Fehlermeldung sagt das darin eine Zugriffsverletzung ist der Fehler kommt
um genau zu sein hier:

Das Ding muss erst instanziiert werden.meinKreis := TKreis.Create;

[Mussi0]

ahh...danke hab jetzt meinen Fehler gefunden

habe das hier vergessen:
meinKreis := TKreis.create; danke schön

Gruß
Muss!0