Au3ToPost - Инструмент для расскраски AutoIt-кода
- Автор темы CreatoR
- Дата начала
ynbIpb
Скриптер
- Сообщения
- 399
- Репутация
- 110
Да любого, хотя если ометить "сохранять в файл", то результат сохраняется.
Падает где-то на этапе визуального отображаения результата.
Я думаю это из-за немецкой винды...
на скрине ошибка нескомпилированного скрипта
------ updated -------
да так и есть нашёл причину
строка 1196
Там в условии Else эта переменная $s5Mins не объявляется.
Падает где-то на этапе визуального отображаения результата.
Я думаю это из-за немецкой винды...
на скрине ошибка нескомпилированного скрипта
------ updated -------
да так и есть нашёл причину
строка 1196
Код:
If StringInStr('0419', @OSLang) Then
Local $sYear = 'Год', $sYears = 'Года', $s5Years = 'Лет'
Local $sDay = 'День', $sDays = 'Дня', $s5Days = 'Дней'
Local $sHour = 'Час', $sHours = 'Часа', $s5Hours = 'Часов'
Local $sMin = 'Минута', $sMins = 'Минуты', $s5Mins = 'Минут'
Local $sSec = 'Секунда', $sSecs = 'Секунды', $s5Secs = 'Секунд'
Else
Local $sYear = 'Year', $sYears = 'Years', $s5Years = 'Years'
Local $sDay = 'Day', $sDays = 'Days', $s5Days = 'Days'
Local $sHour = 'Hour', $sHours = 'Hours', $s5Hours = 'Hours'
Local $sMin = 'Second', $sSecs = 'Seconds', $s5Secs = 'Seconds'
EndIfТам в условии Else эта переменная $s5Mins не объявляется.
Автор
- Сообщения
- 8,673
- Репутация
- 2,486
ynbIpb [?]
В какой раз убеждаюсь в полезности использования Opt('MustDeclareVars', 1).
Да, должно быть так:
Код:
Local $sYear, $sYears, $s5Years, $sDay, $sDays, $s5Days, $sHour, $sHours, $s5Hours, $sMin, $sMins, $s5Mins, $sSec, $sSecs, $s5Secs
If StringInStr('0419', @OSLang) Then
Local $sYear = 'Год', $sYears = 'Года', $s5Years = 'Лет'
Local $sDay = 'День', $sDays = 'Дня', $s5Days = 'Дней'
Local $sHour = 'Час', $sHours = 'Часа', $s5Hours = 'Часов'
Local $sMin = 'Минута', $sMins = 'Минуты', $s5Mins = 'Минут'
Local $sSec = 'Секунда', $sSecs = 'Секунды', $s5Secs = 'Секунд'
Else
Local $sYear = 'Year', $sYears = 'Years', $s5Years = 'Years'
Local $sDay = 'Day', $sDays = 'Days', $s5Days = 'Days'
Local $sHour = 'Hour', $sHours = 'Hours', $s5Hours = 'Hours'
Local $sMin = 'Minute', $sMins = 'Minutes', $s5Mins = 'Minutes'
Local $sSec = 'Second', $sSecs = 'Seconds', $s5Secs = 'Seconds'
EndIfВ какой раз убеждаюсь в полезности использования Opt('MustDeclareVars', 1).
- Сообщения
- 7,790
- Репутация
- 2,322
CreatoR,
Давно я в этой теме про "косячки" не писал.
Попробуйте в любом режиме обработать этот код.
Давно я в этой теме про "косячки" не писал.
Попробуйте в любом режиме обработать этот код.
Код:
;...
Local $iItemCount = _GUICtrlListView_GetItemCount($hListView)
If $iItemCount > 0 Then
Local $aItems[$iItemCount + 1][2]
For $i = 0 To $iItemCount - 1
If _GUICtrlListView_GetItemChecked($hListView, $i) Then
$aItems[0][0] += 1
$aItems[$aItems[0][0]][0] = $i
$aItems[$aItems[0][0]][1] = _GUICtrlListView_GetItemPositionY($hListView, $i)
EndIf
Next
EndIf
If $aItems[0][0] Then
ReDim $aItems[$aItems[0][0] 1][2]
_ArraySort($aItems, 0, 0, 0, 1)
For $i = 1 To $aItems[0][0]
ConsoleWrite(_GUICtrlListView_GetItemText($hListView, $aItems[$i][0]) & @CRLF)
Next
EndIf
;...
- Сообщения
- 7,790
- Репутация
- 2,322