Компьютерный форум OSzone.net  

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)
-   AutoIt (http://forum.oszone.net/forumdisplay.php?f=103)
-   -   [решено] Вопрос по GUICtrlCreateEdit (http://forum.oszone.net/showthread.php?t=244511)

HFShak 12-10-2012 16:27 2004228

Вопрос по GUICtrlCreateEdit
 
Добрый день!
Подстажите, как мне передать переменной в текстовом поле первую(или любую другую) строку, а не весь текст?

madmasles 12-10-2012 16:43 2004240

HFShak,
Смотрите пример к функцииКликните по функции.

HFShak 16-10-2012 09:52 2006289

Спасибо.
А подскажите, как написать цикл, чтобы данная функция возвращала переменной все не пустые строки в текстовом поле.
Например, я вставляю в текстовое поле имена ПК, а_GUICtrlEdit_GetLine() возвращала переменнов $p в функции Ping($p) значения не пустых строк.

madmasles 16-10-2012 14:19 2006470

HFShak,
Попробуйте примерно так.
Код:

#include <GuiConstantsEx.au3>

$sText = 'google.ru' & @CRLF & @CRLF & 'mail.ru' & @CRLF & @CRLF & @CRLF & @CRLF & 'yandex.ru' & @CRLF & @CRLF & @CRLF & @CRLF
GUICreate('Test', 400, 300)
$nEdit = GUICtrlCreateEdit('', 2, 2, 394, 168)
GUICtrlSetData(-1, $sText)
$sText = ''
$nButton = GUICtrlCreateButton('Ping', 150, 180, 100, 30)
GUICtrlSetState(-1, $GUI_FOCUS)
GUISetState()
While 1
    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSE
            Exit
        Case $nButton
            Local $sText = ''
            Local $iCount = 0
            Local $aText = StringSplit(StringStripCR(GUICtrlRead($nEdit)), @LF)
            For $i = 1 To $aText[0]
                If $aText[$i] Then
                    $iCount += 1
                    ConsoleWrite('String num ' & $iCount & @TAB & $aText[$i] & @LF)
                    $sText &= $aText[$i] & @TAB & 'Ping:' & Ping($aText[$i]) & ' msec' & @CRLF
                EndIf
            Next
            $aText = 0
            If $sText Then
                ConsoleWrite('Strings count: ' & $iCount & @LF)
                GUICtrlSetData($nEdit, StringTrimRight($sText, 2))
                $sText = ''
                $iCount = 0
            Else
                GUICtrlSetData($nEdit, '')
            EndIf
            GUICtrlDelete($nButton)
    EndSwitch
WEnd



Время: 20:38.

Время: 20:38.
© OSzone.net 2001-