Вверх ↑
Ответов: 1173
Рейтинг: 49
#1: 2012-08-03 09:35:38 ЛС | профиль | цитата
Вариант раз (программа будет "виснуть", пока грузятся файлы):
code_28688.txt
Вариант два-с (программа "виснуть" не будет):

Add(MainForm,15535783,70,168)
{
link(onCreate,1730580:doWork2,[])
}
Add(StrList,13994448,189,105)
{
@Hint=#10:Тут ссылки|
Strings=#59:http://forum.hiasm.com/xf/attach/share/4523652345623456.png|51:http://forum.hiasm.com/xf/attach/share/speed_ex.PNG|
AddHint(84,38,73,13,@Hint)
}
Add(HTTP_Get,1975074,371,182)
{
link(onDownload,11080979:In,[])
link(URL,7243573:Item,[(377,170)(286,170)(286,226)(195,226)])
link(FileName,12378690:Result,[(384,170)(413,170)(413,226)(314,226)])
}
Add(StrCat,12378690,308,182)
{
Str1="C:Pictures\"
link(onStrCat,1975074:doDownload,[])
AddHint(-117,52,78,13,Str1)
}
Add(FilePartElm,2009830,245,182)
{
link(onPart,12378690:doStrCat,[])
}
Add(CounterEx,12865459,133,182)
{
Min=-1
Default=-1
link(onNext,7243573:doRead,[])
}
Add(ArrayRW,7243573,189,182)
{
link(onRead,2009830:doPart,[])
link(Array,13994448:Array,[(195,166)(209,166)])
}
Add(HubEx,1730580,112,182)
{
link(onEvent,12865459:doNext,[])
}
Add(LineBreak,3843845,70,210)
{
link(Out,1730580:doWork3,[(116,216)])
Primary=[11080979,357,-21]
}
Второй слэш в адресе не обязателен.
------------ Дoбавленo в 09.35:
Ах, да: ещё убедитесь, что папка, в которую качаете, уже существует, а то не сохранит.
карма: 0

0
файлы: 2code_28688.txt [809B] [215], code_28689.txt [1KB] [224]