Вверх ↑
Ответов: 4622
Рейтинг: 746
#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