ProcessManager v 1.1

#include <guiconstants.au3>
#include <guilistview.au3>


$gui=GUICreate("ProcessManager v 1.1",300,650)
GUISetBkColor(0x000000)
$list=GUICtrlCreateListView("Nome processo|Pid",25,0,250,500)
GUICtrlSetBkColor($list,0x000000)
GUICtrlSetColor($list,0x00ff00)
$agg=GUICtrlCreateButton("Aggiorna",25,530,100)
GUICtrlSetBkColor($agg,0x000000)
GUICtrlSetColor($agg,0x00ff00)
$chiudi=GUICtrlCreateButton("Termina Processo",25,570,100)
GUICtrlSetBkColor($chiudi,0x000000)
GUICtrlSetColor($chiudi,0x00ff00)

$processi=ProcessList()

Local $item[$processi[0][0]+1]

For $i=1 to $processi[0][0]
$item[$i]=GUICtrlCreateListViewItem($processi[$i][0]&"|"&$processi[$i][1],$list)
Next

$label=GUICtrlCreateLabel("Numero processi "&$processi[0][0],25,510)
GUICtrlSetColor($label,0x00ff00)



GUISetState()

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $agg
For $i=1 to $processi[0][0]
GUICtrlDelete($item[$i])
Next
$processi=ProcessList()
Local $item[$processi[0][0]+1]
For $i=1 to $processi[0][0]
$item[$i]=GUICtrlCreateListViewItem($processi[$i][0]&"|"&$processi[$i][1],$list)
Next
GUICtrlSetData($label,"Numero processi "&$processi[0][0])
Case $chiudi
For $i=1 to $processi[0][0]
If _GUICtrlListView_GetItemSelected($list,$item[$i])=True Then
$pid=_guictrllistview_getitem($list,$item[$i],1)
ProcessClose($pid[3])
ExitLoop
EndIf
Next
EndSwitch
WEnd