Is %Unicode Defined

Category: .Unicode

Date: 03-28-2012

Return to Index


 
'Compilable Example:
#Compile Exe
#Dim All
%Unicode = 77
Function PBMain() As Long
   ? Str$(UnicodeON)
End Function
 
Function UnicodeOn() As Long
   #If %Def(%Unicode)
      Function = 1
   #Else
      Function = 0
   #EndIf
End Function
 
'gbs_01150
'Date: 03-14-2012


created by gbSnippets
http://www.garybeene.com/sw/gbsnippets.htm