Edit box reverting to Previous Data when gaining focus

[gageteg]

I am having to make a GUI friendly command for ending processes or starting and stopping services remotely using WMI calls instead of 3rd party apps.

The issue I am running into is when I first run the sub routine that generates output to an Edit box it works fine. When i run the function again it initially looks okay but as soon as i mouse over or give the edit box focus it reverts to the previous data, the correct data is being written to the console with a console write.

I am sure i am not seeing something..

expandcollapse popup

#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>
#include <EditConstants.au3>
#include <StaticConstants.au3>
#Include <GuiEdit.au3>


global $computername, $Output

$computername = RegRead("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\ComputerName\ComputerName","ComputerName")

GuiCreate("Remote Process Killer",400,400)
GuiSetState(@SW_SHOW)

$inputbox = GUICtrlCreateInput($computername,10,10)

$button1 = GuiCtrlCreateButton("reset",300,50,50,20)

$button2 = GuiCtrlCreateButton("PSLIST",300,10,50,20)

While 1
    $msg = GUIGetMsg()
        
        Select 
            Case $msg = $Gui_Event_close 
                exit
            Case $msg = $button2
                    $Output = ""
                    CreateList()
            Case $msg = $button1
                MsgBox(1,"Buttontest",$msg)
        EndSelect
        
Wend



Func CreateList()

$computername = GuiCtrlRead($inputbox)
$Output = "*******************************************************"

ConsoleWrite($Output)

$check = ping($computername)

$wbemFlagReturnImmediately = 0x10
$wbemFlagForwardOnly = 0x20
$colItems = ""
$strComputer = $computername

$Output=""
$Output = $Output & "Computer: " & $strComputer  & @CRLF
$objWMIService = ObjGet("winmgmts:\\" & $strComputer & "\root\CIMV2")
$colItems = $objWMIService.ExecQuery("SELECT * FROM Win32_Process", "WQL", _
                                          $wbemFlagReturnImmediately + $wbemFlagForwardOnly)

If IsObj($colItems) then
   For $objItem In $colItems
      $Output = $Output &  $objItem.Description & " - " & $objItem.ProcessId & @CRLF

   Next
  
Else
   Msgbox(0,"WMI Output","No WMI Objects Found for class: " & "Win32_Process" )
Endif

$control = GuiCtrlCreateEdit($Output,10,50,200,300)


   ConsoleWrite($Output)

EndFunc

[BrewManNH]

You should probably use GUICtrlSetData for your editbox rather than making a new one. You have 2 overlapping editboxes instead of one, and you're seeing one or the other because of this.

[gageteg]

Awesome that worked i just moved the Edit box creation to the top right after i created buttons..