Code:
Gui, Add, Edit, w200 R5 vEdit
Gui, Show
COM_Init()
wmi:=COM_GetObject("winmgmts:\\.\root\cimv2")
objRefresher := COM_CreateObject("WbemScripting.SWbemRefresher")
colItem := COM_Invoke(COM_Invoke(objRefresher, "AddEnum", "+" wmi, "Win32_Process"), "objectSet")
COM_Invoke(objRefresher, "Refresh")
COM_Invoke(objRefresher, "Refresh")
Loop
{
penum:=COM_Invoke(colItem, "_NewEnum")
while (COM_Enumerate(penum, obj)=0)
{
If(COM_Invoke(obj, "Name")="AutoHotkey.exe")
Break
COM_Release(obj)
}
List:=COM_Invoke(obj,"WorkingSetSize")/1024 "`n"
GuiControl, , edit, %List%
COM_Invoke(objRefresher, "Refresh")
COM_Release(obj)
COM_Release(penm)
Sleep, 1000
}
This script works. But there is a problem.
Script's memory usage continues to increase. Even more than 100mb.
It seems to be increased by about 60bytes.
If minimize script to Taskbar, memory recoverd.
And then increases again.
COM_Release(obj) no effect?
Otherwise did I make the wrong?