Creat0R
однако... лучший способ разубедить себя - попытаться убедить другого...
Код:
Func _FileReadToArray($sFilePath, ByRef $RetArr)
Local $str = @LF & FileRead($sFilePath)
If @error Then Return SetError(1)
$RetArr = StringRegExp($str,'(^\n|[^\n\r]+)',3)
$RetArr[0] = UBound($RetArr)-1
Return $RetArr
EndFunc
З.Ы. вот только работать этот способ будет чуть медленней
