Вверх ↑
Ответов: 879
Рейтинг: 101
#1: 2009-01-09 21:14:41 ЛС | профиль | цитата
Вот тебе готовая программка, изучай


Add(MainForm,10092804,371,252)
{
Width=382
Height=333
Caption="HTML Page saver"
BorderStyle=1
}
Add(HTTP_Get,14845849,518,294)
{
link(onStatus,8161591:doPosition,[(583,300)(583,321)])
link(onDownload,14577428:doConvert,[])
link(onURLSize,8161591:doMax,[(576,314)(576,328)])
link(URL,16632345:Text,[])
}
Add(Button,13241831,371,308)
{
Left=325
Top=10
Width=40
Caption="get"
link(onClick,14874963:doEvent1,[])
}
Add(Edit,16632345,518,231)
{
Left=5
Top=10
Width=315
Text="http://voip.qip.ru/cgi-bin/qiprubin.dll/cabinet.htm"
}
Add(RichEdit,4387304,840,301)
{
Left=5
Top=35
Width=360
Height=240
ScrollBars=2
Point(FileName)
link(FileName,7485583:Value,[])
}
Add(Convertor,14577428,686,301)
{
Mode=11
link(onResult,4387304:doAdd,[])
}
Add(Button,3866532,623,378)
{
Left=5
Top=280
Caption="save"
link(onClick,7823186:doExecute,[])
}
Add(ProgressBar,8161591,623,315)
{
Left=65
Top=280
Width=300
ProgressColor=-16777214
Point(doMax)
}
Add(Hub,14874963,448,308)
{
link(onEvent1,14845849:GetURLSize,[])
link(onEvent2,14845849:doDownload,[(501,321)(501,300)])
}
Add(SDialog,7823186,686,378)
{
FileName="page_code.html"
link(onExecute,15716119:doEvent1,[])
}
Add(Memory,7485583,861,245)
{
}
Add(Hub,15716119,756,378)
{
link(onEvent1,7485583:doValue,[(805,384)(805,251)])
link(onEvent2,4387304:doSave,[(812,391)(812,335)])
}
карма: 1

0