Quote Originally Posted by M109uk
Hi Gadget,

The problem is the following code:
[pascal]
Player := @lstCreatures.Items[iX];
[/pascal]
Change it to:
[pascal]
Player^ := lstCreatures.Items[iX];
[/pascal]

this should do the trick
Thanks, but I still have a problem =/

If I do what you suggested it says:- Incompatible types 'TCreature and TObject'

If I type cast it like this:-

Player^ := TCreature(lstCreatures.Items[iX]);

I get an access violation?