Тема: AHK: Копирование строк в двумерном массиве
Добрый день!
Имеется двумерный массив table1[x, y]
Нужно скопировать их него в массив table2 некоторые строки по определенному условию.
Допустим, если table1[x, 1] = 1, то строка table1[x] вставляется в конец массива table2.
Таблица1:
1 а б в г д
0 е ж з и к
0 л м н о п
1 р с т у ф
0 х ц ч ш щ
1 ъ ь э ю я
Должна получиться таблица2:
1 а б в г д
1 р с т у ф
1 ъ ь э ю я
Делаю так:
i := 1
loop %x% {
if (table1[A_Index, 1] = 1) {
a := A_Index
loop %y% {
table2[i, A_Index] := table1[a, A_Index]
}
i += 1
}
}
Есть ли способ попроще?
Что-то вроде такого:
loop %x% {
if (table1[A_Index, 1] = 1)
table2.Push(table1[A_Index])
}
UPD:
Пока ковырялся, столкнулся еще с парой проблем.
Создал табличку в excel (см. приложенный файл).
Считываю Range из экселя в массив arr1.
OnExit("ExitFunc")
ExitFunc(ExitReason, ExitCode) {
global Xl
Xl.quit
}
FileSelectFile, inputFile
if Errorlevel
return
Xl := ComObjCreate("Excel.Application")
Xl.Visible := True
ot := Xl.Workbooks.Open(inputFile)
; Определяем длину таблицы
Loop {
a := ot.Worksheets(1).Cells(A_Index, 1).value
if (a = "")
break
x := a_index
}
MsgBox % x ; показывает количество строк в экселевском файле (4)
; Создаем массив из таблицы
dataArea := ot.Worksheets(1).Range("A1:E" x)
arr1 := dataArea.value
; создаем массив вручную
;arr1 := [[0, 2, 3, 4, 5], [1, 5, 4, 3, 2], [0, 6, 7, 8, 9], [1, 9, 8, 7, 6]]
arr2[1] := arr1[1] ; присваиваем первой строке массива arr2 первую строку массива arr1
if (arr2[1] = arr1[1]) ; сравниваем строки
MsgBox Строки идентичны ; msgbox отображается, если arr1 создан из экселя, и НЕ отображается, если создан вручную (О_о)
MsgBox % """" arr1[1,1] """ = """ arr2[1,1] """" ; показывает "0" = "" в обоих случаях
MsgBox % """" arr1.MaxIndex() """ = """ arr2.MaxIndex() """" ; показывает "4" = "" в обоих случаях
ExitApp
Почему arr1[1,1] отображается, а arr2[1,1] нет?
Чем отличаются друг от друга массивы arr1 в случае создания из excel и вручную?
Что ж все так сложно-то, а?
