数组问题

liangxm

想从一个文件里读取字符到数组里，请问c下的数组在autoit下怎么写？

$file = FileOpen("E:\soft\my.log", 0)
$avArray[$i]   ///想定义一个数组
While 1
        $avArray[$i] = FileRead($file, 1)
        $i++     ///这个怎么写？
    If @error = -1 Then ExitLoop
        _ArrayDisplay( $avArray, "原来的数组" )
Wend
FileClose($file)

但好像语法不对，编译通过不了，不知道正确的写法是？

[ 本帖最后由 liangxm 于 2009-4-17 13:11 编辑 ]

seominho

$file = FileOpen("E:\soft\my.log", 0)
$avArray[$i]   ///想定义一个数组-------Dim $avArray[1]=[0],$i=1
While 1
----------------------------------------------------$avArray[0]+=1
----------------------------------------------------ReDim $avArray[uBound(avArray)+1]
        $avArray[$i] = FileRead($file, 1)
        $i++     ///这个怎么写？----------------$i+=1
    If @error = -1 Then ExitLoop
        _ArrayDisplay( $avArray, "原来的数组" )
Wend
FileClose($file)



或者从文件读取到数组可以这么写

_FileReadToArray("E:\soft\my.log",$avArray)
这样 avArray 里的直接就是文件里的数组了

[ 本帖最后由 seominho 于 2009-4-13 16:52 编辑 ]

liangxm

呵呵，找到个
                While 1
                        $line = FileReadLine($file)
                       
                        If @error = -1 Then ExitLoop
                        MsgBox(0, "读到的文本：", $line)
                       
                        $Len = StringLen($line)
                                               
                        Dim $Arr[$Len+1]
                       
                        For $i = 0 to $Len
                               
                        $Arr[$i] = StringMid($line,$i,1)
                       
                        Next

                        _ArrayDisplay($Arr)
                       
                Wend

FileClose($file)

liangxm

原帖由 seominho 于 2009-4-13 15:51 发表
$file = FileOpen("E:\soft\my.log", 0)
$avArray[$i]   ///想定义一个数组-------Dim $avArray[1]=[0],$i=1
While 1
----------------------------------------------------$avArray[0]+=1
------------------- ...

qqq~