Systeminformationen auslesen und anzeigen

  • so, Damit kann man die systeminformationen auslesen lassen ;)

    [autoit]

    #include
    #include
    #include

    [/autoit][autoit][/autoit][autoit]

    $rueckgabe = ""
    $fehler = ""

    [/autoit][autoit][/autoit][autoit]

    GUICreate("Systeminfo",500,500)
    $edit = GUICtrlCreateEdit("Bitte warten...die Systeminformationen werden geladen...",0,0,500,500)
    GUISetState()

    [/autoit][autoit][/autoit][autoit]

    $pid = run(@comspec & " /k systeminfo","",@SW_HIDE,6)

    [/autoit][autoit][/autoit][autoit]

    While 1
    $rueckgabe &= StdOutRead($pid)
    If @error Then ExitLoop
    $fehler &= StdErrRead($pid)
    sleep(10)
    Wend

    [/autoit][autoit][/autoit][autoit]

    GUICtrlSetData($edit,$Rueckgabe)

    [/autoit][autoit][/autoit][autoit]

    While 1
    $msg = GUIGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
    ExitLoop
    EndSelect
    WEnd

    [/autoit]


    </EditConstants.au3></GUIConstants.au3></WindowsConstants.au3>