function Callback_Copy(Source,Destination,Copied,Total,FileCopied,FileTotal)
Label.SetText("Label1","Копирую "..Destination); --путь копирования файлов
Progress.SetRange("Progress1", 0,FileTotal/65535)
Progress.SetCurrentPos("Progress1",FileCopied/65535); --прогресс текушего файла
Progress.SetRange("Progress2", 0,Total/65535)
Progress.SetCurrentPos("Progress2",Copied/65535); -- общий прогресс
end
Folder.Create("C:\\My Folder\\")
File.Copy("AutoPlay\\Docs\\My Folder\\*.*", "C:\\My Folder\\", true, true, false, true, Callback_Copy);
error = Application.GetLastError();
if error ~= 0 then
result = Dialog.Message("Error", "Код Ошибки "..error, MB_OK, MB_ICONSTOP, MB_DEFBUTTON1);
end |
-умер, сорри... 
Ответы на наиболее часто задаваемые вопросы: 
и с 500 я конечно приувеличел!опять же лень 
