#include <Array.au3>
Local $fd = FileOpenDialog('Выберите несколько файлов', @ScriptDir, '(*)', 6)
If @error Then Exit
Local $sd = StringInStr($fd, '|', 0, 1)
If $sd Then
Local $gp = StringLeft($fd, $sd - 1)
Local $str = StringReplace($fd, '|', '*' & $gp & '\')
Local $sc = StringTrimLeft($str, $sd)
Local $res = StringSplit($sc, '*')
_ArrayDisplay($res)
EndIf