Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Ветеран


Сообщения: 904
Благодарности: 162

Профиль | Отправить PM | Цитировать


решение получено от madmasles (http://autoit-script.ru/index.php/topic,2809.0.html)

на всякий, выкладываю рабочий код:

Код: Выделить весь код
Func Getdata()
$file = FileOpen($Filename,0)
    If $file = -1 Then                                              ;Check if file is opened for reading, OK
    MsgBox(0, "Ошибка", "Невозможно открыть файл логов. Проверьте, включено ли логирование, или путь к файлу логов!!!")
    Else
      $Combo1Item=Number(GUICtrlRead($Tab1combo1))                      ;Get # of lines selected
 $aArray = StringSplit(FileRead($file,FileGetSize($filename)),@LF)
 If $aArray[0] < $Combo1Item Then
    $Combo1Item = $aArray[0]
 EndIf
 for $i = (UBound($aArray) - 2) to $i+7-$combo1Item Step -1         ;Ubound read lines bottom up, to # of lines
        $string = StringSplit($aArray[$i], " ", 0)                      ;Split lines in 17 dimensions
        For $a=0 To 13                                                  ;Assign each 13 dimensions to a new Array
         $afArray[$a] = $string[$a]
        next                                                            ;Create string for displaying in ListView
        $data=$afArray[1]&"|"&$afArray[2]&"|"&$afArray[3]&"|"&$afArray[4]&"|"&$afArray[5]&"|" _
        &$afArray[6]&"|"&$afArray[7]&"|"&$afArray[8]&"|"&$afArray[9]&"|"&$afArray[10]&"|"&$afArray[11]&"|"&$afArray[12]&"|"&$afArray[13]
        $dataCol=GUICtrlCreateListViewItem($data,$listviewFw)
      Next
      FileClose($file)
    EndIf
EndFunc

-------
мы рождены, чтоб сказку сделать былью


Последний раз редактировалось saavaage, 07-10-2010 в 18:13.


Отправлено: 15:21, 06-10-2010 | #2