#include <GuiListView.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
$Path = @ScriptDir & "\config.ini"
GUICreate("ini", 280, 270)
$ListView1 = GUICtrlCreateListView("账号           |密码           |", 10, 10, 260, 150)
$Button1 = GUICtrlCreateButton("添加", 185, 178, 75, 25, $WS_GROUP)
$Input1 = GUICtrlCreateInput("", 60, 180, 120, 21)
$Input2 = GUICtrlCreateInput("", 60, 220, 120, 21)
$Label1 = GUICtrlCreateLabel("账号:", 20, 183, 36, 17)
$Label2 = GUICtrlCreateLabel("密码:", 20, 223, 36, 17)
$Label3 = GUICtrlCreateLabel("数据", 200, 223, 36, 17)
$Label4 = GUICtrlCreateLabel("0", 230, 223, 36, 17)
GUISetState(@SW_SHOW)
$z = 0
_GUICtrlListView_DeleteAllItems($ListView1)
$read = IniReadSection($Path, "config")
If Not @error Then
        For $i = 1 To $read[0][0]
                GUICtrlCreateListViewItem($read[$i][0], $ListView1)
                _GUICtrlListView_AddSubItem($ListView1, $z, $read[$i][1], 1, $z + 1)
                GUICtrlSetData($Label4, $z + 1)
                $z += 1
        Next
EndIf
While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case - 3
                        Exit
                Case $Button1
                        $z = GUICtrlRead($Label4)
                        $a = GUICtrlRead($Input1)
                        $b = GUICtrlRead($Input2)
                        If $a <> "" And $b <> "" Then
                                IniWrite($Path, "config", $a, $b)
                                GUICtrlCreateListViewItem($a, $ListView1)
                                _GUICtrlListView_AddSubItem($ListView1, $z, $b, 1, $z + 1)
                                MsgBox(0, "提示", " 账号: " & $a & " 密码: " & $b & " 保存成功 ")
                                GUICtrlSetData($Input1, "")
                                GUICtrlSetData($Input2, "")
                                GUICtrlSetData($Label4, $z + 1)
                        EndIf
        EndSwitch
WEnd