close
*程式功能: 判斷作業系統位元版本 (64bit 傳回 .T.)
*程式來源:http://berezniker.com/content/pages/visual-foxpro/how-detect-64-bit-os
*程式來源: http://www.tek-tips.com/viewthread.cfm?qid=1579552&page=1
*程式作者: cbasoz
*******************************************************
Declare Integer IsWow64Process In WIN32API ;
Integer hProcess, Integer @ Wow64Process
Declare Integer GetCurrentProcess In WIN32API
Local lnWin64
lnWin64 = 0
Try
IsWow64Process( GetCurrentProcess(), @lnWin64)
ENDTRY
RETURN ( m.lnWin64 != 0 )
全站熱搜
留言列表