Reverse enumeration lookup
Posted: Fri Aug 14, 2009 1:20 pm
Code: Select all
Enumeration 0, EnumName
#Test
#Toast
#Debugging
EndEnumeration
A = #Debugging
Show.s = ConstantString(A, EnumName)
; Show = "#Debugging"
http://www.purebasic.com
https://www.purebasic.fr/english/
Code: Select all
Enumeration 0, EnumName
#Test
#Toast
#Debugging
EndEnumeration
A = #Debugging
Show.s = ConstantString(A, EnumName)
; Show = "#Debugging"