Показать полную графическую версию : [решено] Работа со строками и циклами
eus_deus
09-09-2013, 21:43
Добрый вечер! Подбросили мне идею, и начало кода, который у меня не заработал. Итак, имеем текст в текстовом поле $Edit1
TOTALCMD#BAR#DATA
%COMMANDER_PATH%\Programs\Players\AIMP3\AIMP3.exe
%COMMANDER_PATH%\Wcmicons.dll,387
AIMP3
0
-1
Это код кнопки файлового менеджера Total commander/ Код нужно конвертировать в строку
MENUITEM AIMP3#!#387#!#%COMMANDER_PATH%\Programs\Players\AIMP3\AIMP3.exe
С этим прекрасно справляется функция
Func _Convert()
Local $s_Read, $s_Ico, $s_NewString
$Config=IniRead ($INICONV, "Setting", "Config", 1)
$s_result=GUICtrlRead($Edit2)
GUICtrlSetData($Edit2,"")
Switch $Config
Case '1'
$s_NewString="MENUITEM "
Case '0'
$s_NewString="M "
EndSwitch
$s_Read =StringSplit(GUICtrlRead($Edit1),@CRLF,1)
If $s_Read[0] < 5 Then Return
If StringInStr ( $s_Read[4], "wcmicons.dll") then
$s_Ico = StringRegExpReplace($s_Read[4], '^.*,', '')
Else
$s_Ico=$s_Read[4]
Endif
$s_NewString &=$s_Read[5] & $Delimeters & $s_Ico&$Delimeters & $s_Read[2] & StringRegExpReplace( $Delimeters & $s_Read[3], $Delimeters & '$|\s+', '')
GUICtrlSetData($Edit2, $s_result&$s_NewString& @CRLF)
_GUICtrlEdit_Scroll($Edit2, $SB_SCROLLCARET )
GUICtrlSetData($Edit1, "")
EndFunc
Но это все работает только для кода одной кнопки, а если их несколько, то как быть? Чтобы загнать 10 кнопок, нажать на кнопку, и на выходе получить 10 строк вида
MENUITEM ..................
Подкинули начало функции
Func _Convert2()
$sSect='TOTALCMD#BAR#DATA'
$Edit1=StringReplace($Edit1,$sSect,'['&$sSect&']')
$aC=StringRegExp($Edit1,'(?m)^\[[^]\r\n]+\].*(?:[\r\n]+[^[\r\n][^\r\n]+)*', 3)
For $i=0 To UBound($aC)
MsgBox(4096, "Переменная ", "$aC =>" & $aC[$i] & "<=")
Next
EndFunc
Строка MsgBox(4096, "Переменная ", "$aC =>" & $aC[$i] & "<=") выдает ошибку, хотя она там по сути и не нужна
это все работает только для кода одной кнопки, а если их несколько, то как быть? »
Для начала хотя бы показать (код), как оно выглядит где есть несколько кнопок.
Хотя можно попробовать:
$vTest = ClipGet (http://autoit-script.ru/autoit3_docs/functions/ClipGet.htm)() ;Тут содержимое кода
;Get TOTALCMD#... blocks
$aData = StringRegExp (http://autoit-script.ru/autoit3_docs/functions/StringRegExp.htm)($vTest, '(?s)BAR#DATA\s+(.+?)(?:TOTALCMD#|$)', 3)
$sMenuItems = ''
For (http://www.autoitscript.com/autoit3/docs/keywords.htm#For) $i = 0 To (http://www.autoitscript.com/autoit3/docs/keywords.htm#To) UBound (http://autoit-script.ru/autoit3_docs/functions/UBound.htm)($aData)-1
$aParams = StringRegExp (http://autoit-script.ru/autoit3_docs/functions/StringRegExp.htm)($aData[$i], '(.*)\r\n\r\n.*,(-?\d+)\r\n(.*)\r\n', 3)
If (http://www.autoitscript.com/autoit3/docs/keywords.htm#If) UBound (http://autoit-script.ru/autoit3_docs/functions/UBound.htm)($aParams) >= 3 Then (http://www.autoitscript.com/autoit3/docs/keywords.htm#Then)
$sMenuItems &= 'MENUITEM ' & $aParams[2] & '#!#' & $aParams[1] & '#!#' & $aParams[0] & @CRLF (http://autoit-script.ru/autoit3_docs/macros.htm#@crlf)
EndIf (http://www.autoitscript.com/autoit3/docs/keywords.htm#EndIf)
Next (http://www.autoitscript.com/autoit3/docs/keywords.htm#Next)
MsgBox (http://autoit-script.ru/autoit3_docs/functions/MsgBox.htm)(64, 'Title', $sMenuItems)
eus_deus
10-09-2013, 13:20
Для начала хотя бы показать (код), как оно выглядит где есть несколько кнопок. »
Да вот так выглядит
TOTALCMD#BAR#DATA
%COMMANDER_PATH%\Programs\Players\AIMP3\AIMP3.exe
%COMMANDER_PATH%\Wcmicons.dll,387
AIMP3
0
-1
TOTALCMD#BAR#DATA
%COMMANDER_PATH%\Programs\Players\AIMP3\AIMP3.exe
%COMMANDER_PATH%\Wcmicons.dll,387
AIMP3
0
-1
TOTALCMD#BAR#DATA
%COMMANDER_PATH%\Programs\Players\AIMP3\AIMP3.exe
%COMMANDER_PATH%\Wcmicons.dll,387
AIMP3
0
-1
Используется один код одной кнопки, просто для наглядности.
Хотя можно попробовать:
Код:
$vTest = ClipGet() ;Тут содержимое кода
;Get TOTALCMD#... blocks
$aData = StringRegExp($vTest, '(?s)BAR#DATA\s+(.+?)(?:TOTALCMD#|$)', 3)
$sMenuItems = ''
For $i = 0 To UBound($aData)-1
$aParams = StringRegExp($aData[$i], '(.*)\r\n\r\n.*,(-?\d+)\r\n(.*)\r\n', 3)
If UBound($aParams) >= 3 Then
$sMenuItems &= 'MENUITEM ' & $aParams[2] & '#!#' & $aParams[1] & '#!#' & $aParams[0] & @CRLF
EndIf
Next
MsgBox(64, 'Title', $sMenuItems) »
При этом коде - в результате пустое окно
При этом коде - в результате пустое окно »
Это и не удивительно, если в буфере обмена нет нужного кода.
Замени ClipGet() на GUICtrlRead($Edit1).
eus_deus
10-09-2013, 18:43
С кнопокой такого вида - не работает
TOTALCMD#BAR#DATA
%COMMANDER_PATH%\Programs\Players\AIMP3\AIMP3.exe
%P%S
Wcmicons.dll,387
Открыть выделенные файлы\папки в AIMP3
0
-1
и menuitem ставиться только в первую строчку. не во все
eus_deus
10-09-2013, 19:21
и необходимо условие
If StringInStr ( $s_Read[4], "wcmicons.dll") then
$s_Ico = StringRegExpReplace($s_Read[4], '^.*,', '')
Else
$s_Ico=$s_Read[4]
Endif
Назначение - если в строке нет wcmicons.dll, то вставлять строку полностью, если содержит, то использовать только номер
eus_deus,
А можно узнать, зачем все это надо?
Уважаю и TC и AutoIt, не первый год обоими пользуюсь. Но зачем надо делать подобные преобразования - ума не приложу. Вдруг мне тоже надо? :)
eus_deus
11-09-2013, 11:16
Dm666, сомневаюсь, что тебе пригодится.
А можно узнать, зачем все это надо? »
Ну как сказать - делаю для себя сборку тотала, и мне нужен такой фуннкционал. Еще хочу выучить autoit? для этого нужна реальная задача. Скрипт "Привет мир" я писал только две недели назад, простые функции вроде clipget() и guictrlsetdata() вроде понятны, а вот конструкции такого вида
For $i = 0 To UBound($aData)-1
$aParams = StringRegExp($aData[$i], '(.*)\r\n\r\n.*,(-?\d+)\r\n(.*)\r\n', 3)
If UBound($aParams) >= 3 Then
$sMenuItems &= 'MENUITEM ' & $aParams[2] & '#!#' & $aParams[1] & '#!#' & $aParams[0] & @CRLF
EndIf
Next »
для меня еще темный лес, равно как и регулярные выражения
Уважаю и TC и AutoIt, не первый год обоими пользуюсь. »
Тоже с тоталом знаком не первый год, но только в этом году решил копнуть поглубже
Итак, теперь дополнение к вопросу. Код кнопки тотала содержит 6-8 строк (в завимости от параметров)
TOTALCMD#BAR#DATA
"%COMMANDER_PATH%\Programs\Graphics\Photoshop\App\PhotoshopCS6\Photoshop.exe"
%P%S
%COMMANDER_PATH%\Wcmicons.dll,511
Открыть выбранные файлы в Photoshop
-1
или
TOTALCMD#BAR#DATA
%COMMANDER_PATH%\Programs\Players\AIMP3\AIMP3.exe
%P%S
Wcmicons.dll,387
Открыть выделенные файлы\папки в AIMP3
0
-1
Из этих строк нужна такая конструкция:
MENUITEM 5 cтрока#!#4 строка(с условием, о котором писал выше)#!#2 строка#!#3 строка
Для случая, когда в поле одна кнопка, я пример писал рабочий. Как сделать это в цикле?
теперь дополнение к вопросу »
Это не дополнение, а обязательные условия. На будущее, прежде чем создать тему, определи для себя какой будет задача, и укажи всевозможные условия задачи.
$vTest = ClipGet (http://autoit-script.ru/autoit3_docs/functions/ClipGet.htm)() ;Тут содержимое кода
;Get TOTALCMD#... blocks
$aData = StringRegExp (http://autoit-script.ru/autoit3_docs/functions/StringRegExp.htm)($vTest, '(?s)BAR#DATA\s+(.+?)(?:TOTALCMD#|$)', 3)
$sMenuItems = ''
For (http://www.autoitscript.com/autoit3/docs/keywords.htm#For) $i = 0 To (http://www.autoitscript.com/autoit3/docs/keywords.htm#To) UBound (http://autoit-script.ru/autoit3_docs/functions/UBound.htm)($aData)-1
$aParams = StringSplit (http://autoit-script.ru/autoit3_docs/functions/StringSplit.htm)(StringStripCR (http://autoit-script.ru/autoit3_docs/functions/StringStripCR.htm)($aData[$i]), @LF (http://autoit-script.ru/autoit3_docs/macros.htm#@lf))
If (http://www.autoitscript.com/autoit3/docs/keywords.htm#If) $aParams[0] >= 4 Then (http://www.autoitscript.com/autoit3/docs/keywords.htm#Then)
If (http://www.autoitscript.com/autoit3/docs/keywords.htm#If) StringInStr (http://autoit-script.ru/autoit3_docs/functions/StringInStr.htm)($aParams[3], 'wcmicons.dll') Then (http://www.autoitscript.com/autoit3/docs/keywords.htm#Then)
$aParams[3] = StringRegExpReplace (http://autoit-script.ru/autoit3_docs/functions/StringRegExpReplace.htm)($aParams[3], '.*?(-?\d+)', '\1')
EndIf (http://www.autoitscript.com/autoit3/docs/keywords.htm#EndIf)
$sMenuItems &= 'MENUITEM ' & $aParams[4] & '#!#' & $aParams[3] & '#!#' & $aParams[1] & '#!#' & $aParams[2] & @CRLF (http://autoit-script.ru/autoit3_docs/macros.htm#@crlf)
EndIf (http://www.autoitscript.com/autoit3/docs/keywords.htm#EndIf)
Next (http://www.autoitscript.com/autoit3/docs/keywords.htm#Next)
MsgBox (http://autoit-script.ru/autoit3_docs/functions/MsgBox.htm)(64, 'Title', $sMenuItems)
eus_deus
11-09-2013, 14:46
Creat0R, ну прости засранца)) Вроде ставлю задачу, вроде всае расписываю, а всегда чего то не хватает..Я просто не углядел, что коды у кнопок могут иметь разное количество строк...
eus_deus
11-09-2013, 15:36
Я опять сюда. Итак, после модернизации функция выглядит так
Func _Convert2()
Local $sMenuItems
$Config=IniRead ($INICONV, "Setting", "Config", 1)
$vTest = GUICtrlRead($Edit1)
$s_result=GUICtrlRead($Edit2)
GUICtrlSetData($Edit2,"")
$aData = StringRegExp($vTest, '(?s)BAR#DATA\s+(.+?)(?:TOTALCMD#|$)', 3)
Switch $Config
Case '1'
$sMenuItems="MENUITEM "
Case '0'
$sMenuItems="M "
EndSwitch
For $i = 0 To UBound($aData)-1
$aParams = StringSplit(StringStripCR($aData[$i]), @LF)
If $aParams[0] >= 4 Then
If StringInStr($aParams[3], 'wcmicons.dll') Then
$aParams[3] = StringRegExpReplace($aParams[3], '.*?(-?\d+)', '\1')
EndIf
$sMenuItems &=$aParams[4] & $Delimeters & $aParams[3] & $Delimeters & $aParams[1] & $Delimeters & $aParams[2]&@CRLF
EndIf
GUICtrlSetData($Edit2, $s_result&$sMenuItems)
_GUICtrlEdit_Scroll($Edit2, $SB_SCROLLCARET )
GUICtrlSetData($Edit1, "")
Next
EndFunc
Не устраивает два пункта:
1. Потеря menuitem после первой строки ( есть только в первой, в остальных нет)
2. В конце строк не должно быть #!# ( записанного в переменную $Delimeters)
1 вопрос решен. остался второй - удаление $Delimeters на конце строки.
Func _Convert2()
$sMenuItems=''
$Config=IniRead ($INICONV, "Setting", "Config", 1)
$vTest = GUICtrlRead($Edit1)
$s_result=GUICtrlRead($Edit2)
GUICtrlSetData($Edit2,"")
$aData = StringRegExp($vTest, '(?s)BAR#DATA\s+(.+?)(?:TOTALCMD#|$)', 3)
For $i = 0 To UBound($aData)-1
$aParams = StringSplit(StringStripCR($aData[$i]), @LF)
If $aParams[0] >= 4 Then
If StringInStr($aParams[3], 'wcmicons.dll') Then
$aParams[3] = StringRegExpReplace($aParams[3], '.*?(-?\d+)', '\1')
EndIf
Switch $Config
Case '1'
$sMenuItems &="MENUITEM "&$aParams[4] & $Delimeters & $aParams[3] & $Delimeters & $aParams[1] & $Delimeters & $aParams[2]&@CRLF
Case '0'
$sMenuItems &="M "&$aParams[4] & $Delimeters & $aParams[3] & $Delimeters & $aParams[1] & $Delimeters & $aParams[2]&@CRLF
EndSwitch
EndIf
GUICtrlSetData($Edit2, $s_result&$sMenuItems)
_GUICtrlEdit_Scroll($Edit2, $SB_SCROLLCARET )
GUICtrlSetData($Edit1, "")
Next
EndFunc
Func (http://www.autoitscript.com/autoit3/docs/keywords.htm#Func) _Convert2()
$sDelimiters = '#!#'
$sMenuItems = ''
$iConfig = Int (http://autoit-script.ru/autoit3_docs/functions/Int.htm)(IniRead (http://autoit-script.ru/autoit3_docs/functions/IniRead.htm)($INICONV, 'Setting', 'Config', 1))
$sData1 = GUICtrlRead (http://autoit-script.ru/autoit3_docs/functions/GUICtrlRead.htm)($Edit1)
$sData2 = GUICtrlRead (http://autoit-script.ru/autoit3_docs/functions/GUICtrlRead.htm)($Edit2)
GUICtrlSetData (http://autoit-script.ru/autoit3_docs/functions/GUICtrlSetData.htm)($Edit2, '')
$aData = StringRegExp (http://autoit-script.ru/autoit3_docs/functions/StringRegExp.htm)($sData1, '(?s)BAR#DATA\s+(.+?)(?:TOTALCMD#|$)', 3)
For (http://www.autoitscript.com/autoit3/docs/keywords.htm#For) $i = 0 To (http://www.autoitscript.com/autoit3/docs/keywords.htm#To) UBound (http://autoit-script.ru/autoit3_docs/functions/UBound.htm)($aData) - 1
$aParams = StringSplit (http://autoit-script.ru/autoit3_docs/functions/StringSplit.htm)(StringStripCR (http://autoit-script.ru/autoit3_docs/functions/StringStripCR.htm)($aData[$i]), @LF (http://autoit-script.ru/autoit3_docs/macros.htm#@lf))
If (http://www.autoitscript.com/autoit3/docs/keywords.htm#If) $aParams[0] >= 4 Then (http://www.autoitscript.com/autoit3/docs/keywords.htm#Then)
If (http://www.autoitscript.com/autoit3/docs/keywords.htm#If) StringInStr (http://autoit-script.ru/autoit3_docs/functions/StringInStr.htm)($aParams[3], 'wcmicons.dll') Then (http://www.autoitscript.com/autoit3/docs/keywords.htm#Then)
$aParams[3] = StringRegExpReplace (http://autoit-script.ru/autoit3_docs/functions/StringRegExpReplace.htm)($aParams[3], '.*?(-?\d+)', '\1')
EndIf (http://www.autoitscript.com/autoit3/docs/keywords.htm#EndIf)
$sMItem = 'M '
If (http://www.autoitscript.com/autoit3/docs/keywords.htm#If) $iConfig = 1 Then (http://www.autoitscript.com/autoit3/docs/keywords.htm#Then)
$sMItem = 'MENUITEM '
EndIf (http://www.autoitscript.com/autoit3/docs/keywords.htm#EndIf)
$sMItem &= $aParams[4] & $sDelimiters & $aParams[3] & $sDelimiters & $aParams[1] & $sDelimiters & $aParams[2]
$sMItem = StringRegExpReplace (http://autoit-script.ru/autoit3_docs/functions/StringRegExpReplace.htm)($sMItem, '(\Q' & $sDelimiters & '\E){2,}', $sDelimiters) ;Заменяем два или более присутствующих разделителей на один
$sMenuItems &= StringRegExpReplace (http://autoit-script.ru/autoit3_docs/functions/StringRegExpReplace.htm)($sMItem, '\Q' & $sDelimiters & '\E\h*$', '') & @CRLF (http://autoit-script.ru/autoit3_docs/macros.htm#@crlf) ;Удаляем разделитель на конце строки
EndIf (http://www.autoitscript.com/autoit3/docs/keywords.htm#EndIf)
GUICtrlSetData (http://autoit-script.ru/autoit3_docs/functions/GUICtrlSetData.htm)($Edit2, $sData2 & $sMenuItems)
_GUICtrlEdit_Scroll (http://autoit-script.ru/autoit3_docs/libfunctions/_guictrledit_scroll.htm)($Edit2, $SB_SCROLLCARET)
GUICtrlSetData (http://autoit-script.ru/autoit3_docs/functions/GUICtrlSetData.htm)($Edit1, '')
Next (http://www.autoitscript.com/autoit3/docs/keywords.htm#Next)
EndFunc (http://www.autoitscript.com/autoit3/docs/keywords.htm#EndFunc)
eus_deus
11-09-2013, 17:05
Creat0R, нет. Разделитель на конце есть, и все параметры идут одной строкой. цельной
Поправил.
На будущее, заготовь заранее рабочий пример, с которым можно было бы экспериментировать.
Вот мне например, пришлось самому его делать чтобы проверить функцию...
#include (http://autoit-script.ru/autoit3_docs/keywords.htm##include) <GUIConstantsEx.au3>
#include (http://autoit-script.ru/autoit3_docs/keywords.htm##include) <ScrollbarConstants.au3>
#include (http://autoit-script.ru/autoit3_docs/keywords.htm##include) <GUIEdit.au3>
$INICONV = @ScriptDir (http://autoit-script.ru/autoit3_docs/macros.htm#@scriptdir) & '\test.ini'
$sCode = ClipGet (http://autoit-script.ru/autoit3_docs/functions/ClipGet.htm)()
$hGUI = GUICreate (http://autoit-script.ru/autoit3_docs/functions/GUICreate.htm)('', 400, 600)
$Edit1 = GUICtrlCreateEdit (http://autoit-script.ru/autoit3_docs/functions/GUICtrlCreateEdit.htm)($sCode, 20, 20, 200, 200)
$Edit2 = GUICtrlCreateEdit (http://autoit-script.ru/autoit3_docs/functions/GUICtrlCreateEdit.htm)('', 20, 320, 200, 200)
GUISetState (http://autoit-script.ru/autoit3_docs/functions/GUISetState.htm)(@SW_SHOW (http://autoit-script.ru/autoit3_docs/macros.htm#@sw_show), $hGUI)
_Convert2()
While (http://www.autoitscript.com/autoit3/docs/keywords.htm#While) 1
$nMsg = GUIGetMsg (http://autoit-script.ru/autoit3_docs/functions/GUIGetMsg.htm)()
Switch (http://www.autoitscript.com/autoit3/docs/keywords.htm#Switch) $nMsg
Case (http://www.autoitscript.com/autoit3/docs/keywords.htm#Case) $GUI_EVENT_CLOSE
Exit (http://www.autoitscript.com/autoit3/docs/keywords.htm#Exit)
EndSwitch (http://www.autoitscript.com/autoit3/docs/keywords.htm#EndSwitch)
WEnd (http://www.autoitscript.com/autoit3/docs/keywords.htm#WEnd)
Func (http://www.autoitscript.com/autoit3/docs/keywords.htm#Func) _Convert2()
$sDelimiters = '#!#'
$sMenuItems = ''
$iConfig = Int (http://autoit-script.ru/autoit3_docs/functions/Int.htm)(IniRead (http://autoit-script.ru/autoit3_docs/functions/IniRead.htm)($INICONV, 'Setting', 'Config', 1))
$sData1 = GUICtrlRead (http://autoit-script.ru/autoit3_docs/functions/GUICtrlRead.htm)($Edit1)
$sData2 = GUICtrlRead (http://autoit-script.ru/autoit3_docs/functions/GUICtrlRead.htm)($Edit2)
GUICtrlSetData (http://autoit-script.ru/autoit3_docs/functions/GUICtrlSetData.htm)($Edit2, '')
$aData = StringRegExp (http://autoit-script.ru/autoit3_docs/functions/StringRegExp.htm)($sData1, '(?s)BAR#DATA\s+(.+?)(?:TOTALCMD#|$)', 3)
For (http://www.autoitscript.com/autoit3/docs/keywords.htm#For) $i = 0 To (http://www.autoitscript.com/autoit3/docs/keywords.htm#To) UBound (http://autoit-script.ru/autoit3_docs/functions/UBound.htm)($aData) - 1
$aParams = StringSplit (http://autoit-script.ru/autoit3_docs/functions/StringSplit.htm)(StringStripCR (http://autoit-script.ru/autoit3_docs/functions/StringStripCR.htm)($aData[$i]), @LF (http://autoit-script.ru/autoit3_docs/macros.htm#@lf))
If (http://www.autoitscript.com/autoit3/docs/keywords.htm#If) $aParams[0] >= 4 Then (http://www.autoitscript.com/autoit3/docs/keywords.htm#Then)
If (http://www.autoitscript.com/autoit3/docs/keywords.htm#If) StringInStr (http://autoit-script.ru/autoit3_docs/functions/StringInStr.htm)($aParams[3], 'wcmicons.dll') Then (http://www.autoitscript.com/autoit3/docs/keywords.htm#Then)
$aParams[3] = StringRegExpReplace (http://autoit-script.ru/autoit3_docs/functions/StringRegExpReplace.htm)($aParams[3], '.*?(-?\d+)', '\1')
EndIf (http://www.autoitscript.com/autoit3/docs/keywords.htm#EndIf)
$sMItem = 'M '
If (http://www.autoitscript.com/autoit3/docs/keywords.htm#If) $iConfig = 1 Then (http://www.autoitscript.com/autoit3/docs/keywords.htm#Then)
$sMItem = 'MENUITEM '
EndIf (http://www.autoitscript.com/autoit3/docs/keywords.htm#EndIf)
$sMItem &= $aParams[4] & $sDelimiters & $aParams[3] & $sDelimiters & $aParams[1] & $sDelimiters & $aParams[2]
$sMItem = StringRegExpReplace (http://autoit-script.ru/autoit3_docs/functions/StringRegExpReplace.htm)($sMItem, '(\Q' & $sDelimiters & '\E){2,}', $sDelimiters) ;Заменяем два или более присутствующих разделителей на один
$sMenuItems &= StringRegExpReplace (http://autoit-script.ru/autoit3_docs/functions/StringRegExpReplace.htm)($sMItem, '\Q' & $sDelimiters & '\E\h*$', '') & @CRLF (http://autoit-script.ru/autoit3_docs/macros.htm#@crlf) ;Удаляем разделитель на конце строки
EndIf (http://www.autoitscript.com/autoit3/docs/keywords.htm#EndIf)
GUICtrlSetData (http://autoit-script.ru/autoit3_docs/functions/GUICtrlSetData.htm)($Edit2, $sData2 & $sMenuItems)
_GUICtrlEdit_Scroll (http://autoit-script.ru/autoit3_docs/libfunctions/_guictrledit_scroll.htm)($Edit2, $SB_SCROLLCARET)
GUICtrlSetData (http://autoit-script.ru/autoit3_docs/functions/GUICtrlSetData.htm)($Edit1, '')
Next (http://www.autoitscript.com/autoit3/docs/keywords.htm#Next)
EndFunc (http://www.autoitscript.com/autoit3/docs/keywords.htm#EndFunc)
eus_deus
11-09-2013, 18:27
Creat0R, понял, пример максимальные пояснения с меня. Объясни еще , как ты с такой расцветкой код вставляешь?
как ты с такой расцветкой код вставляешь? »
Au3ToPost (http://autoit-script.ru/index.php/topic,117.0.html)
© OSzone.net 2001-2012
vBulletin v3.6.4, Copyright ©2000-2025, Jelsoft Enterprises Ltd.