EnableExplicit

Define memex.MEMORYSTATUSEX

memex.MEMORYSTATUSEX
memex\dwLength = SizeOf(MEMORYSTATUSEX)
GlobalMemoryStatusEx_(@memex)
MessageRequester("","Verbrauch des virtuellen Speichers: "+Str((memex\ullTotalVirtual-memex\ullAvailVirtual)/1024/1024)+" MB",0)