Вверх ↑
Ответов: 4650
Рейтинг: 760
#1: 2017-12-07 16:25:25 ЛС | профиль | цитата

Add(MainForm,630793,357,203)
{
 Width=399
 Height=507
 Caption="HTTPClient - заголовки и параметры"
 Position=1
}
Add(Button,12479344,476,329)
{
 Left=10
 Top=60
 Width=140
 Height=25
 Caption="Выполнить"
 link(onClick,5102370:doEvent1,[])
}
Add(Memo,2568247,959,308)
{
 Left=10
 Top=95
 Width=360
 Height=370
 ScrollBars=3
}
Add(Message,363691,714,357)
{
 Caption="Ошибка запроса"
 Icon=1
}
Add(DoData,7347341,770,308)
{
 link(onEventData,9377522:doEvent1,[])
 link(Data,2427935:getVar,[])
}
Add(Hub,9377522,847,308)
{
 InCount=2
 OutCount=1
 link(onEvent1,2568247:doAdd,[])
}
Add(Hub,5102370,532,329)
{
 link(onEvent1,8936422:doWork,[])
 link(onEvent2,6023390:doLoadString,[])
}
Add(LineBreakEx,8936422,567,329)
{
 Caption="clear"
}
Add(LineBreakEx,2111794,889,315)
{
 Caption="clear"
 Type=1
 link(OnEvent,2568247:doClear,[])
}
Add(LineBreakEx,2427935,770,280)
{
 Caption="head"
 Type=2
}
Add(LineBreakEx,15402714,644,385)
{
 Caption="head"
 Type=3
 link(_Data,6023390:RawHeaders,[])
}
Add(Edit,4213360,623,280)
{
 Left=10
 Top=30
 Width=360
 Text="http://rucaptcha.com/in.php"
}
Add(HTTPClient,6023390,623,336)
{
 Method=1
 PostData="method=post\r\nkey=06a0e455d106be20e0d21f7faf3d45f1"
 UploadFile="C:\Users\Николай\Desktop\securimage_show.php.png"
 FileField="file"
 Point(RawHeaders)
 Point(Headers)
 Point(PostData)
 link(URL,4213360:Text,[])
 link(onHeadersAvail,7347341:doData,[(672,342)(672,314)])
 link(onFinish,9377522:doEvent2,[(827,349)(827,321)])
 link(onError,363691:doMessage,[])
 AddHint(-73,52,44,13,Method)
}
Add(Label,10388595,357,252)
{
 Left=10
 Top=10
 Width=38
 Height=17
 Caption="Адрес:"
}

Само собой разумеется, файл "C:\Users\Николай\Desktop\securimage_show.php.png" должен существовать.
карма: 26

0
Редактировалось 1 раз(а), последний 2017-12-07 16:26:26