Вверх ↑
Ответов: 3514
Рейтинг: 184
#1: 2009-02-21 17:52:54 ЛС | профиль | цитата
Add(MainForm,2953706,140,175){
Width=599
Height=467
}
Add(Button,5349034,224,231)
{
Left=255
Top=15
link(onClick,11021987:doBuild,[])
}
Add(Edit,511036,266,147)
{
Left=15
Top=15
Width=120
Text="1"
}
Add(Edit,15545401,308,147)
{
Left=135
Top=15
Width=120
Text="2"
}
Add(TCP_Client,5988577,448,231)
{
Port=80
IP="83.234.72.2"
link(onRead,3968871:doAdd,[])
}
Add(HTTP_PostBuilder,13551532,350,231)
{
URL="http://stat.trunkcom.ru/cgi-bin/clients/login"
Host="stat.trunkcom.ru"
Referer="http://stat.trunkcom.ru/cgi-bin/clients/login"
link(onBuild,3473778:doEvent1,[])
}
Add(Memo,3968871,511,231)
{
Left=15
Top=40
Width=555
Height=375
ScrollBars=3
}
Add(Hub,3473778,406,231)
{
link(onEvent1,5988577:doOpen,[])
link(onEvent2,5988577:doSend,[(430,244)(430,251)])
}
Add(URLBuilder,11021987,294,231)
{
Args=#6:action|5:login|8:password|6:Submit|
link(onBuild,13551532:doBuild,[])
link(action,13527944:Value,[(300,212)(230,212)])
link(login,511036:Text,[(307,205)(272,205)])
link(password,15545401:Text,[])
link(Submit,16466954:Value,[(321,205)(356,205)])
}
Add(Memory,13527944,224,147)
{
Default=String(validate)
}
Add(Memory,16466954,350,147)
{
Default=String(%F7%CF%CA%D4%C9%21)
}
Посмотрел. Сделал по аналогии. Толку - 0 )
карма: 0
0