Что нового

Помогите как сделать так чтоб функция ProcessList помещала процессы в List

  • Автор темы max1300
  • Дата начала
M

max1300

Гость
Помогите как сделать так чтоб функция ProcessList помещала процессы в элемент List у меня имеется такой код

Код:
#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=D:\KodaFormDesinger\Forms\GetProccesInform.kxf
$Form1 = GUICreate("GetProgInform", 525, 355, 193, 125)
$List1 = GUICtrlCreateList("", 0, 0, 521, 292)
$Button1 = GUICtrlCreateButton("получить процессы", 176, 312, 161, 25, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Button1 
			$qlist = ProcessList()
			GUICtrlSetData($List1,$qlist)
	EndSwitch
WEnd


ни чего не работает
 

gloss

Ленивое кодило
Сообщения
155
Репутация
5
Держи
Код:
#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=D:\KodaFormDesinger\Forms\GetProccesInform.kxf
$Form1 = GUICreate("GetProgInform", 525, 355, 193, 125)
$List1 = GUICtrlCreateList("", 0, 0, 521, 292)
$Button1 = GUICtrlCreateButton("получить процессы", 176, 312, 161, 25, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button1
            $qlist = ProcessList()
			For $i = 1 To $qlist[0][0]
				GUICtrlSetData($List1,$qlist[$i][0],1)
			Next
    EndSwitch
WEnd
 

InnI

AutoIT Гуру
Сообщения
4 505
Репутация
1 225
max1300
При наличии нескольких процессов с одинаковыми именами, пример gloss'a отображает в списке имя только одного из них.
Если вам нужны имена ВСЕХ процессов, можно сделать так
Код:
Case $Button1
            GUICtrlSetData($List1, "") ; очистка
            $qlist = ProcessList()
            For $i = 1 To $qlist[0][0]
                ; GUICtrlSetData($List1,$qlist[$i][0],1)
                GUICtrlSendMsg($List1, 0x0180, 0, $qlist[$i][0]) ; $LB_ADDSTRING
            Next
 
Верх