Ticket #2791: _ArrayExtract.au3

File _ArrayExtract.au3, 568 bytes (added by Shane0000, 11 years ago)

Adapted code from helpfile that highlights the issues of _ArrayExtract

Line 
1#include <Array.au3>
2
3Local $aArray[4][4]
4For $i = 0 To 3
5        For $j = 0 To 3
6                $aArray[$i][$j] = $i & $j
7        Next
8Next
9_ArrayDisplay($aArray, "Original")
10
11Local $aExtract = _ArrayExtract($aArray, 0, 3, 1, 1)
12_ArrayDisplay($aExtract, "Row 0-3 column 1")
13
14Local $aExtract = _ArrayExtract($aArray, 0, 3, 0, 0)
15_ArrayDisplay($aExtract, "Row 0-3 column 0")
16
17Local $aExtract = _ArrayExtract($aArray, 1, 1, 1, 3)
18_ArrayDisplay($aExtract, "Row 1 column 1 - 3")
19
20Local $aExtract = _ArrayExtract($aArray, 0, 0, 1, 3)
21_ArrayDisplay($aExtract, "Row 0 column 1 - 3")