Fossil Rock Posted October 21, 2006 Share Posted October 21, 2006 (edited) Nevermind ... figured it out.... What did I miss ? It appears to be loading the data but the text doesn't show. I've verified it is reading the text correctly.NOTE: Need to start Windows Task Manager, I'm using the Process tab.expandcollapse popup#include <GUIConstants.au3> #Include <GuiListView.au3> Opt("WinTitleMatchMode", 2) $Form1 = GUICreate("AForm1", 633, 447, 193, 115) $ListView1 = GUICtrlCreateListView("", 24, 88, 573, 262) $Progress1 = GUICtrlCreateProgress(24, 352, 573, 17) Const $title = "Windows Task Manager" Const $CID = 0x000003F1 $RowCount = ControlListView ($title,"", $CID, "GetItemCount") $ColCount = ControlListView ($title,"", $CID, "GetSubItemCount") Dim $results[$RowCount+1][$ColCount+1] GUISetState(@SW_SHOW) GetData() While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd Func GetData() $Increment = 100/$RowCount For $row = 0 to $RowCount - 1 GUICtrlCreateListViewItem("", $ListView1) For $col = 0 to $ColCount - 1 $results[$row][$col] = ControlListView($title,"", $CID,"GetText", $row, $col) _GUICtrlListViewSetItemText($ListView1, $row, $col, $results[$row][$col]) Next GUICtrlSetData($Progress1, Int($row * $Increment)) Next GUICtrlSetData($Progress1, Int($row * $Increment)) EndFunc Edited October 21, 2006 by Fossil Rock Agreement is not necessary - thinking for one's self is! Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now