Можно ли узнать разрядность ОС

Procedure.s OSbits()
;-------------------
; Check if the OS is 32 or 64 bit.
;
 Protected Is64BitOS = 0 ; Returns 1 for 64bit, else 0.
 Protected hDLL, IsWow64Process_
 Protected sOSbits.s = "64"
 
       hDll = OpenLibrary(#PB_Any,"kernel32.dll")
    If hDll
 
               IsWow64Process_ = GetFunction(hDll,"IsWow64Process")
 
            If IsWow64Process_
 
                    CallFunctionFast(IsWow64Process_, GetCurrentProcess_(), @Is64BitOS)
            EndIf
 
            CloseLibrary(hDll)
    EndIf     
 
    If Not (Is64BitOS = 1) : sOSbits = "32" : EndIf
 
    ProcedureReturn sOSbits
 
  EndProcedure
  
  Debug OSbits()

Import ""
  GetNativeSystemInfo(*info)
EndImport
 
Procedure IsWin64(); is the OS 64;
  Protected Info.SYSTEM_INFO
  GetNativeSystemInfo(Info)
  If info\wProcessorArchitecture
    ProcedureReturn #True
  EndIf
EndProcedure
 
Debug IsWin64()