Hallo,
ich würde mir gerne die msdos Ausgabe von z.B. ping in einer gui anzeigen lassen, bekomme aber alles in einer Zeile und nicht schön untereinander.
Wie kann ich die einzelne Zeilen mir anzeigen lassen ?
#include <ButtonConstants.au3>#include <ComboConstants.au3>#include <GUIConstantsEx.au3>#include <WindowsConstants.au3>#include <GUIConstants.au3>#include <file.au3>#include <Date.au3>#include <array.au3>#include <Process.au3>#include <ProgressConstants.au3>#include <StaticConstants.au3>#include <UpdownConstants.au3>#include <EditConstants.au3>#include <ListboxConstants.au3>#include <ComboConstants.au3>#include <Constants.au3>#include <ButtonConstants.au3>#include <StaticConstants.au3>#include <GuiListView.au3>
$Form1_1 = GUICreate("ping Status", 850, 450, 300, 160)GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")$EXIT = GUICtrlCreateButton("EXIT", 100, 368, 145, 41, $BS_PUSHLIKE)GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")$Button1 = GUICtrlCreateButton("Ping Status", 24, 25, 150, 35)GUISetState(@SW_SHOW)
While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $Button1 $cmdreturn = "" $returncode=run(@ComSpec & " /c " & "ping 127.0.0.1",@SystemDir, @SW_HIDE, $STDERR_MERGED + $STDIN_CHILD) While 1 ; loop through the return from the command until there is no more $line = StdoutRead($returncode) If @error Then ExitLoop $cmdreturn &= $line WEnd $cmdreturn1=StringSplit($cmdreturn,@CRLF) For $i = 0 To UBound($cmdreturn1) - 1 GUICtrlCreateInput($cmdreturn1[$i] , 180, 155, 600, 60) Next GUICtrlCreateInput($cmdreturn, 180, 25, 600, 60) Case $GUI_EVENT_CLOSE Exit Case $EXIT Exit EndSwitchWEnd
