Вверх ↑
Этот топик читают: Гость
Ответов: 12
Рейтинг: 0
#16: 2010-07-19 12:20:35 ЛС | профиль | цитата
Вот код:
Add(MainForm,2953706,21,105)
{
Width=905
Height=558
BorderStyle=4
link(onActivate,11937977:doDownload,[(100,111)(100,90)])
}
Add(HTTP_Get,11937977,147,84)
{
URL="http://demo.informersland.ru/list.txt"
Wait=0
link(onDownload,11877134:doConvert,[])
link(onStop,769116:doTimer,[(181,111)(181,153)])
}
Add(Convertor,11877134,196,91)
{
Mode=11
link(onResult,8326637:doText,[])
}
Add(StrList,8326637,245,70)
{
}
Add(WebBrowser,9270888,245,168)
{
Top=95
Width=900
Height=440
link(onNavigate,8418652:doText,[(313,174)(313,216)])
link(URL,8326637:Text,[])
}
Add(Timer,769116,182,147)
{
AutoStop=1
link(onTimer,9270888:doNavigate,[(230,153)(230,174)])
}
Add(StatusBar,8418652,350,210)
{
link(Text,9270888:CurrentURL,[(356,205)(251,205)])
}
карма: 0

0
Ответов: 4641
Рейтинг: 334
#17: 2010-07-19 12:35:04 ЛС | профиль | цитата
pavel2494, приблизительно, как то так

Add(MainForm,6579284,119,84)
{
Width=905
Height=558
BorderStyle=4
link(onActivate,11937977:doDownload,[])
}
Add(HTTP_Get,11937977,182,84)
{
URL="http://demo.informersland.ru/list.txt"
Wait=0
link(onDownload,11877134:doConvert,[])
link(onStop,769116:doTimer,[(226,111)(226,160)])
}
Add(Convertor,11877134,252,91)
{
Mode=11
link(onResult,8326637:doText,[])
}
Add(StrList,8326637,364,70)
{
}
Add(WebBrowser,9270888,455,154)
{
Top=95
Width=900
Height=440
link(onNavigate,8418652:doText,[])
}
Add(Timer,769116,252,154)
{
Interval=5000
Enable=1
link(onTimer,1855339:doNext,[])
}
Add(StatusBar,8418652,532,154)
{
link(Text,9270888:CurrentURL,[(538,142)(500,142)(500,198)(461,198)])
}
Add(ArrayRW,15976119,378,154)
{
link(onRead,9270888:doNavigate,[])
link(Array,8326637:Array,[])
}
Add(Counter,1855339,315,154)
{
link(onNext,15976119:doRead,[])
}


карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
17
Сообщение
...
Прикрепленные файлы
(файлы не залиты)