GUID

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.

Perturbatio

you mean something like this?

that or:

Type TMyType
	Global _NextIncrement = 1
	Global list:TList
	
	Field UID:String
	
	
	
	Function Create:TMyType()
		If list = Null Then list = New TList
		Local temp:TMyType = New TMyType
			temp.UID = "TMyType"+_NextIncrement
			_NextIncrement:+1
			list.addLast(temp)
		Return temp
	End Function
	
End Type


For Local i:Int = 0 To 99
	TMyType.Create()
Next


For Local t:TMyType = EachIn TMyType.list
	Print t.UID
Next