方法有好几种 ,判断 系统文件夹/读取注册表/利用api
举一个api的例子,权当抛砖引玉.

程序代码:
* 判断64位操作系统
DECLARE LONG GetNativeSystemInfo IN Kernel32 STRING@
is64Bit = Is64bitSystem()
? is64Bit && 返回.f. 或 .t.
FUNCTION Is64bitSystem()
LOCAL stSYSTEM_INFO
stSYSTEM_INFO = REPLICATE(0h00, 36)
GetNativeSystemInfo(@stSYSTEM_INFO)
RETURN INLIST(CTOBIN(LEFT(stSYSTEM_INFO, 2), "2RS"), 6, 9)
ENDFUNC