[REBOL] Windows .dll question: getmemorystatusex

From: peta::mailinator::com at: 15-Oct-2008 11:20

[REBOL] Windows .dll question: getmemorystatusex

Hi Bo,

REBOL []

kernel32: load/library %kernel32.dll
memorystatusex: make struct! [
  dwLength [int]
  dwMemoryLoad [int]
  ullTotalPhys [long]
  ullTotalPhys1 [long]
  ullAvailPhys [long]
  ullAvailPhys1 [long]
  ullTotalPagefile [long]
  ullTotalPagefile1 [long]
  ullAvailPageFile [long]
  ullAvailPageFile1 [long]
  ullTotalVirtual [long]
  ullTotalVirtual1 [long]
  ullAvailVirtual [long]
  ullAvailVirtual1 [long]
  ullAvailExtendedVirtual [long]
  ullAvailExtendedVirtual1 [long]
] none
globalmemorystatusex: make routine! compose/deep [
  lpBuffer [struct! [(first memorystatusex)]]
  return: [long]
] kernel32 "GlobalMemoryStatusEx"
meminfo: make struct! memorystatusex none
meminfo/dwLength: length? third meminfo
res: globalmemorystatusex meminfo

(Windows XP Pro SP 3, 2.7.6.3.1)

1 · 2 · [3] · See whole thread