Help: GetTypeName

BlitzMax Forums/BlitzMax Beginners Area/Help: GetTypeName

Red(Posted 2005) [#1]
I search a easy way to know type name wihtout using ToString() generic method ?

This is my last result:
Type TA
EndType 

Type TB
EndType 

Type TC
EndType 

'new object
Local obj:TB=New TB
Print GetTypeName(obj)

'Retrieve type name
Function GetTypeName$(thing:Object)	
	Select True    
		Case TA(thing)<>Null
			Return "obj - Type A"
			
		Case TB(thing)<>Null
			Return "obj - Type B"
			
		Case TC(thing)<>Null
			Return "obj - Type C"			
	EndSelect 	
EndFunction 
My main problem is to register type like that :
Type TZ
EndType 
RegisterType(TZ,"obj - type Z")
It's not possible to code that in Bmax