pointer und proceduren

[braingrenade]

Moin Leute !

hab folgendes problem:

Delphi-Quellcode:

Type tding = class
    private
      x,y : integer;
    public
     procedure move(xpos,ypos);
end;


Type PTding = ^Tding;

var X : Tding;
var PX : PTding;


procedure tding.move(xpos,ypos);
begin
x := x + xpos;  //hier kommt der Fehler
y := y + ypos;
end;

procedure ...
begin
PX := @Tding;
PX.move(2,2);
end;

So , beim asführen gibt er mir aber eine Acces violation.

Weiß jemand warum ?