Вверх ↑
Ответов: 35
Рейтинг: 0
#1: 2021-10-08 17:19:56 ЛС | профиль | цитата
Netspirit писал(а):
Компонент EventFromData замени на Memory. Вообще не используй EventFromData, пока точно не будешь понимать принцип его действия.

спосибо заменил

Make(delphi)
ver(4.05 build 186)
Add(MainForm,2953706,21,105)
{
Width=671
Height=468
link(onCreate,10959725:doEvent1,[])
}
Add(Charset,4035241,252,91)
{
Type=7
link(onCharset,10385316:doReplace,[])
}
Add(Convertor,4909607,210,91)
{
Mode=11
link(onResult,4035241:doCharset,[])
}
Add(HTTP_Get,7044225,161,84)
{
URL="https://faills.ru/reglogin/cthat/chat.php"
Method=1
link(onDownload,4909607:doConvert,[])
}
Add(RichEdit,9856322,651,133)
{
Left=15
Top=15
Width=310
Height=310
Font=[MS Sans Serif,10,3,0,1]
ScrollBars=3
ReadOnly=0
}
Add(BlockFind,3450763,364,91)
{
StartBlock="<div class="msg"><div class="info"><span class="name">"
EndBlock="</div>"
link(onSearch,13353085:doReplace,[])
}
Add(Replace,13353085,420,91)
{
SubStr="</span><span class="misc"><span class="date">"
DestStr=" "
link(onReplace,5656781:doReplace,[])
}
Add(Replace,5656781,469,91)
{
SubStr="<div class="msg"><div class="info"><span class="name">"
link(onReplace,11981885:doReplace,[])
}
Add(Replace,11981885,525,91)
{
SubStr="</span> </span></div2>"
DestStr="\r\n"
link(onReplace,9909837:doReplace,[])
}
Add(Replace,10385316,308,91)
{
SubStr="</span></div>"
DestStr="</span></div2>"
link(onReplace,3450763:doSearch,[])
}
Add(Replace,9909837,574,91)
{
SubStr="</div>"
DestStr="\r\n"
link(onReplace,9856322:doAdd,[(625,97)(625,139)])
}
Add(MMTimer,607047,154,140)
{
Interval=10000
Enable=1
link(onTimer,2685135:doEvent1,[])
}
Add(Hub,10959725,84,119)
{
link(onEvent1,13742830:doWork2,[(107,125)(107,90)])
link(onEvent2,607047:doTimer,[(126,132)(126,146)])
}
Add(Hub,2685135,231,140)
{
link(onEvent1,9856322:doClear,[])
link(onEvent2,13742830:doWork3,[(257,153)(257,123)(130,123)])
}
Add(HubEx,13742830,126,84)
{
link(onEvent,7044225:doDownload,[])
}
Add(Edit,1329548,336,231)
{
Left=20
Top=365
Width=300
Text=""
}
Add(Button,2494136,259,294)
{
Left=260
Top=395
Caption="send"
link(onClick,5332216:doString,[])
}
Add(FormatStr,5332216,329,294)
{
Mask="name=%1\r\ntext=%2"
link(onFString,6249464:doValue,[])
link(Str1,6928940:Text,[(335,275)(279,275)])
link(Str2,1329548:Text,[])
}
Add(Edit,6928940,273,224)
{
Left=105
Top=340
Width=125
Text="андрей"
}
Add(RichEdit,9106734,539,350)
{
Left=365
Top=25
Width=275
Height=315
ScrollBars=3
}
Add(DoData,10388014,462,364)
{
link(onEventData,9106734:doText,[])
link(Data,12060081:RawHeaders,[(468,352)(440,352)(440,403)(413,403)])
}
Add(CookieManager,16324802,322,357)
{
Name="555"
}
Add(HTTPClient,12060081,393,359)
{
URL="http://faills.ru/reglogin/cthat/chat.php"
Method=1
CookieManager="555"
Point(RawHeaders)
Point(PostData)
link(onHeadersAvail,10388014:doData,[(443,365)(443,370)])
link(PostData,6249464:Value,[(413,343)(412,343)])
}
Add(Memory,6249464,406,294)
{
link(onData,12060081:doLoadString,[(450,300)(450,329)(381,329)(381,365)])
}
он выводит данные но запрос всё равно не получается
информация из HTTPClient

HTTP/1.1 200 OK
Cache-Control: max-age=2592000
Connection: keep-alive
Date: Fri, 08 Oct 2021 14:18:19 GMT
Keep-Alive: timeout=30
Transfer-Encoding: chunked
Content-Type: text/html; charset=UTF-8
Expires: Sun, 07 Nov 2021 14:18:19 GMT
Server: nginx-reuseport/1.21.1
Vary: Accept-Encoding
Vary: Accept-Encoding
X-Powered-By: PHP/5.6.40
карма: 0

0