temp.au3

#include <Array.au3>
#include <RecFileListToArray.au3>

;$timer = TimerInit()
;  òîëüêî ôàéëû
;$aArray = _RecFileListToArray("Z:\__derun\", "*", 1, 1, 0, 2)
;$timer = Round(TimerDiff($timer) / 1000, 2) & ' ñåê'
;_ArrayDisplay($aArray, $timer)
#cs
#include <Array.au3>

Local $avArray[10][2]

$avArray[0][0] = "JPM"
$avArray[1][0] = "Holger"
$avArray[2][0] = "Jon"
$avArray[3][0] = "Larry"
$avArray[4][0] = "Jeremy"
$avArray[5][0]= "Valik"
$avArray[6][0] = "Cyberslug"
$avArray[7][0] = "Nutster"
$avArray[8][0] = "JdeB"
$avArray[9][0] = "Tylo"

_ArrayDisplay($avArray, "$avArray ÏÅÐÅÄ _ArrayInsert()")
_ArrayInsert($avArray, 4, "= Âñòàâëåííûé =")
_ArrayDisplay($avArray, "$avArray ÏÎÑËÅ _ArrayInsert()")


Func max($x, $y) ; Âîçâðàùàåò áîëüøåå èç äâóõ ÷èñåë
    If $x > $y Then
        Return $x
    Else
        Return $y
    EndIf
EndFunc
$t = max(5,8)
MsgBox(4096, "", max(5,8))
#ce
; Ñêðèïò ïîêàçûâàåò èìåíà âñåõ ôàéëîâ â òåêóùåé äèðåêòîðèè.
$hSearch = FileFindFirstFile("t*.*") ; âîçâðàùàåò äåñêðèïòîð ïîèñêà

; Ïðîâåðêà, ÿâëÿåòñÿ ëè ïîèñê óñïåøíûì
If $hSearch = -1 Then
    MsgBox(4096, "Îøèáêà", "Íè îäèí èç ôàéëîâ èëè êàòàëîãîâ íå ñîîòâåòñòâóåò ìàñêå ïîèñêà")
    Exit
EndIf

While 1
    $sFile = FileFindNextFile($hSearch) ; âîçâðàùàåò èìÿ ñëåäóþùåãî ôàéëà, íà÷èíàÿ îò ïåðâîãî äî ïîñëåäíåãî
    If @error Then ExitLoop

    $iAnswer = MsgBox(1, "Ñëåäóþùèé ôàéë / êàòàëîã:", $sFile)
    If $iAnswer = 2 Then ExitLoop
WEnd

; Çàêðûâàåò äåñêðèïòîð ïîèñêà
FileClose($hSearch)