'Unhandle Exception. Attempt to access...

The forum is locked. These are the original blitzbasic.com forums, kept so they can still be read. No new topics, replies or edits can be made here. To join in, head over to the Blitz3D+ forums.

JoJo

...field or Method of Null object.
What am not getting. I don't see my mistake.

Strict
Graphics 640,480,0


'instantiate objects
Global imgBlue:Image= image.Create("gfx/blue.bmp")
Global imgGreen:Image = Image.Create("gfx\green.bmp")
Global imgYellow:Image = Image.Create("gfx\yellow.bmp")
Global imgRed:Image = Image.Create("gfx\red.bmp")
Global imgOrange:Image = Image.Create("gfx\orange.bmp")
Global imgPurple:Image = Image.Create("gfx\purple.bmp")

Global ImageList:TList = New TList	
Global ParticleList:TList = New TList

Type Image
	Global ImageListCount:Int =0
	Field xpos,ypos:Int
	Field _image:TPixmap = New TPixmap
	Field AlphaLevel:Int
	
	'create
	Function Create:Image(strPath:String)
		Local img:Image = New Image
		img._image = LoadPixmap(strPath)
		ImageList.AddLast img
		Return img
	End Function	
	
	
	'constructor
	Method New()
		ImageListCount:+1
		xpos = (GraphicsWidth() / 2)
		ypos = (GraphicsHeight() / 2)
	End Method
End Type

Local xpos,ypos:Int

While Not KeyDown(KEY_ESCAPE)
xpos:+1
ypos:+1
	DrawPixmap imgBlue._image, xpos, ypos
	Flip
Wend