Как вывести эту функцию в Editbox [AutoIt Gui]

Я нашел этот фрагмент кода, который извлекает общедоступную информацию для IP, но я хочу, чтобы этот вывод был записан в EditBox, который у меня есть в моем графическом интерфейсе.

Как это можно сделать.

это код, который при запуске в редакторе SCITE помещает информацию в консоль SCIITE. Я хочу нажать кнопку, чтобы поместить информацию в поле редактирования в моем графическом интерфейсе.

    _RetrievePublicInfo()

Func _RetrievePublicInfo($iRefresh = 0)
    ConsoleWrite(@CRLF & "IP: " & BinaryToString(InetRead('http://api.externalip.net/ip/', $iRefresh), 4) & @CRLF & @CRLF & _
    "Hostname: " & BinaryToString(InetRead('http://api.externalip.net/hostname/', $iRefresh), 4) & @CRLF)
EndFunc

person remoras    schedule 04.11.2012    source источник


Ответы (1)


Зачем использовать внешние функции, если они уже встроены AutoIt UDF?

Use _GetIP()

#include <GUIConstantsEx.au3>
#include <GuiIPAddress.au3>
#include <Inet.au3>




Local $hgui, $hIPAddress

    $hgui = GUICreate("IP Address Control Clear Example", 150, 100)

    $hIPAddress = _GUICtrlIpAddress_Create($hgui, 10, 10)
    _GUICtrlIpAddress_Set($hIPAddress, "0.0.0.0")

    $Button = GUICtrlCreateButton("Get my IP!", 20, 50, 100)

    GUISetState(@SW_SHOW)



    ; Wait for user to close GUI
    Do 
     $msg = GUIGetMsg()
        Select
            Case $msg = $GUI_EVENT_CLOSE
                ExitLoop
            Case $msg =  $Button
                Local $PublicIP = _GetIP ()
                _GUICtrlIpAddress_ClearAddress( $hIPAddress)
                _GUICtrlIpAddress_Set($hIPAddress, $PublicIP)

        EndSelect 
    Until GUIGetMsg() = $GUI_EVENT_CLOSE
person Milos    schedule 06.10.2013