Новое в системе Wolfram
Mathematica
9
◄
предыдущая
|
следующая
►
Новое в системе Wolfram
Mathematica
9
›
Поддержка полного спектра интернет-доступа
Отображение индикатора выполнения
Загрузка данных с веб-сайта и отображение индикаторов выполнения загрузки.
In[1]:=
X
urls = {"http://google.com", "http://exampledata.wolfram.com/5mb.dat", "http://exampledata.wolfram.com/10mb.dat"}; progressBars[_] := 0.; progFunction[asyncObj_, "progress", {dlnow_, dltotal_, _, _}] := Quiet[progressBars[asyncObj] = dlnow/dltotal]
In[2]:=
X
asyncObjs = URLFetchAsynchronous[#, progFunction, "Progress" -> True] & /@ urls;
In[3]:=
X
Dynamic[Grid[{Style[First[#], FontFamily -> "SansSerif"], ProgressIndicator[progressBars[#]]} & /@ asyncObjs, Alignment -> Left]]
Out[3]=