zscy231 发表于 2009-2-8 13:29:34

这个代码怎么写~~

想 点刷新把msconfig启动项里的内容显示到 GUICtrlCreateListView   控件里
如图

78391493 发表于 2009-2-9 09:38:39

我觉得这个还是自己写比较清楚

GUICreate("Form1", 625, 445)
$ListView1 = GUICtrlCreateListView("名称|路径", 80, 40, 441, 313)
GUICtrlSendMsg(-1, 0x1000 + 30, 0, 150)
GUICtrlSendMsg(-1, 0x1000 + 30, 1, 287)
$Search = FileFindFirstFile(@StartupCommonDir & "\*.*")
While 1
        $FileName = FileFindNextFile($Search)
    If @error Then ExitLoop
        GUICtrlCreateListViewItem($FileName&"|"&@StartupCommonDir, $ListView1)
WEnd
For $i = 1 To 10000
        $RegName = RegEnumVal("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run", $i)
        If @error <> 0 Then ExitLoop
        $RegRead = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run", $RegName)
        GUICtrlCreateListViewItem($RegName&"|"&$RegRead, $ListView1)
Next
GUISetState(@SW_SHOW)
While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case - 3
                        Exit
        EndSwitch
WEnd

范统.贾 发表于 2009-2-10 12:49:26

1 to 10000...不过这样好像蛮简单的。
页: [1]
查看完整版本: 这个代码怎么写~~