Вверх ↑
Этот топик читают: Гость
Ответов: 4234
Рейтинг: 661
#226: 2020-01-23 15:59:32 ЛС | профиль | цитата
У меня твоя схема работает. У тебя ни один сайт не открывается? Что выдаёт onError? У тебя последняя версия компонентов?
карма: 22

0
Ответов: 109
Рейтинг: 5
#227: 2020-01-23 16:13:13 ЛС | профиль | цитата
Netspirit писал(а):
У меня твоя схема работает. У тебя ни один сайт не открывается? Что выдаёт onError? У тебя последняя версия компонентов?

Оказалась не последняя версия была обновился и все заработало. Netspirit, Спасибо за помощ.
карма: 0

0
Ответов: 21
Рейтинг: 0
#228: 2020-02-11 07:43:39 ЛС | профиль | цитата
Как подключить куки менеджер к браузеру?
карма: 0

0
Ответов: 1324
Рейтинг: 68
#229: 2020-02-11 11:06:33 ЛС | профиль | цитата
Kotofey, пример есть в архиве
карма: 2

0
Ответов: 4234
Рейтинг: 661
#230: 2020-02-11 12:17:58 ЛС | профиль | цитата
Данные компоненты не имеют отношения к браузеру (если речь идёт о компоненте WebBrowser). Разве что компонент CookieManager может иметь с ним общие куки (при Source=IE). Можно авторизоваться с HTTPClient, и просматривать страницы в WebBrowser (или наоборот). Но насколько и где это работает - надо тестировать.

Редактировалось 1 раз(а), последний 2020-02-11 12:18:25
карма: 22

0
Ответов: 411
Рейтинг: 13
#231: 2020-02-29 11:40:32 ЛС | профиль | цитата
Вот схема демонстрирующая ошибку в компоненте HTTPClient, на многих сайтах так

Add(Memo,6405246,308,168)
{
Top=30
Width=640
Height=288
ScrollBars=2
}
Add(MainForm,2953706,42,161)
{
Width=659
Height=364
}
Add(HTTPClient,15265623,161,161)
{
URL="https://en.isoc.org.il/"
UserAgent="Mozilla/5.0 (Windows NT 6.1; Win64; x64; rv:70.0) Gecko/20100101 Firefox/70.0"
ConnectTimeout=15000
SendTimeout=8000
RecvTimeout=8000
SSLProtocols=1
IgnoreInvalidCN=1
IgnoreInvalidDate=1
IgnoreUnknownCA=1
IgnoreWrongUsage=1
IgnoreWeakSignature=1
RespCharset=1
Point(Proxy)
link(onFinish,10876553:doEvent1,[])
link(onError,1139900:doMessage,[])
}
Add(Button,4370111,105,161)
{
Left=5
Top=5
Width=100
Caption="HTTPClient"
link(onClick,15265623:doLoadString,[])
}
Add(Message,1139900,210,182)
{
}
Add(Button,13938655,105,231)
{
Left=140
Top=5
Width=80
Caption="HTTP_Get"
link(onClick,12289714:doDownload,[])
}
Add(HTTP_Get,12289714,161,231)
{
URL="https://en.isoc.org.il/"
Wait=0
UserAgent="Mozilla/5.0 (Windows NT 6.1; Win64; x64; rv:70.0) Gecko/20100101 Firefox/70.0"
Point(Proxy)
link(onDownload,16223457:doConvert,[])
}
Add(StreamConvertor,16223457,210,238)
{
Mode=6
link(onResult,10876553:doEvent2,[(258,244)(258,181)])
}
Add(Hub,10876553,273,168)
{
InCount=2
OutCount=1
link(onEvent1,6405246:doAdd,[])
}
карма: 4

0
Ответов: 109
Рейтинг: 5
#232: 2020-02-29 12:01:48 ЛС | профиль | цитата
Sersey писал(а):
Вот схема демонстрирующая ошибку в компоненте HTTPClient, на многих сайтах так

У меня схема работает без ошибок. win10
карма: 0

0
Ответов: 411
Рейтинг: 13
#233: 2020-02-29 12:19:07 ЛС | профиль | цитата
win7 64 компонент HTTPClient выдает ошибку 12175
карма: 4

0
Ответов: 1324
Рейтинг: 68
#234: 2020-02-29 16:49:55 ЛС | профиль | цитата
Sersey писал(а):
win7 64 компонент HTTPClient выдает ошибку 12175


у меня то же
карма: 2

0
Ответов: 1324
Рейтинг: 68
#235: 2020-02-29 21:08:27 ЛС | профиль | цитата
Sersey, по http работает, причем раз в 10 быстрее http_get
карма: 2

0
Ответов: 4234
Рейтинг: 661
#236: 2020-03-02 13:40:10 ЛС | профиль | цитата
Пока что непонятно. Проблема, вероятно, с сертификатом сервера и для её обхода вроде бы должны помогать параметры SSLIgnore. Но почему-то не работает. Возможно зависит от установленных обновлений Windows и набора шифров.

Редактировалось 2 раз(а), последний 2020-03-02 14:43:15
карма: 22

0
Ответов: 220
Рейтинг: 9
#237: 2020-03-04 18:05:29 ЛС | профиль | цитата
Что бы избежать ошибки 12175 и не только я ставил обновление kb3140245 http://www.catalog.update.microsoft.com/search.aspx?q=kb3140245
карма: 2

1
Голосовали:Netspirit
Ответов: 4234
Рейтинг: 661
#238: 2020-03-04 18:21:52 ЛС | профиль | цитата
Да, действительно, это может быть то что нужно. У меня Windows 7 обновляется автоматически, но, видимо, это обновление было не обязательным.

Проверьте у кого была ошибка.

Если не поможет - попробуйте также добавить поправку в файле WinHTTP.pas в строке 84:
WINHTTP_FLAG_SECURE_PROTOCOL_TLS1_2;


Редактировалось 4 раз(а), последний 2020-03-05 14:49:27
карма: 22

0
Ответов: 109
Рейтинг: 5
#239: 2020-03-22 18:56:10 ЛС | профиль | цитата
Netspirit, HTTPClient Unicode version от 2019-10-25 для FPC при POST запросе вылетает ошибка.
Вот схема.
Add(MainForm,2953706,63,42)
{
Width=609
Height=562
}
Add(Button,6013603,63,105)
{
Left=5
link(onClick,16337173:doLoadString,[])
}
Add(HTTPClient,16337173,154,105)
{
URL="http://www.wheelmartseattle.com/wmfitment/black/index.php"
Method=1
Headers="Accept: text/html,application/xhtml+xml,application/xml;q=0.9,image/webp,image/apng,*/*;q=0.8,application/signed-exchange;v=b3;q=0.9\r\nAccept-Language: ru,uk;q=0.9,en-US;q=0.8,en;q=0.7,ru-RU;q=0.6\r\nCache-Control: max-age=0\r\nConnection: keep-alive\r\nContent-Type: application/x-www-form-urlencoded\r\nHost: www.wheelmartseattle.com\r\nOrigin: http://www.wheelmartseattle.com\r\nReferer: http://www.wheelmartseattle.com/wmfitment/black/index.php\r\nUpgrade-Insecure-Requests: 1\r\nUser-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/80.0.3987.122 Safari/537.36"
EncType=1
PostData="selectModel=ILX&selectYear=2020&selectMake=ACURA"
Point(PostData)
link(onFinish,2776497:doAdd,[])
}
Add(Memo,2776497,245,112)
{
Left=5
Top=25
Width=585
Height=495
Ctl3D=1
ScrollBars=3
}

Это только у меня или баг?

Редактировалось 2 раз(а), последний 2020-03-24 17:57:04
карма: 0

0
Ответов: 5
Рейтинг: 0
#240: 2020-03-23 17:53:53 ЛС | профиль | цитата
Здравствуйте, уважаемые разработчики. Прошу соизволить помочь мне в моем деле. Я желаю создать элемент авторизации на всеми вами известную социальную сеть. Но возникают некоторые проблемы. Вне зависимости от того: я ввожу правильные данные, или же неправильные, ссылка перенаправления остается такой же как и всегда. Заранее благодарю.
Add(MainForm,2953706,21,105)
{
}
Add(Edit,11112831,42,168)
{
Text="Логин"
}
Add(Edit,15051529,84,168)
{
Top=20
Text="Пароль"
}
Add(Button,16105839,63,105)
{
Left=50
Caption="Вход"
link(onClick,3756977:doLoadString,[])
}
Add(HTTPClient,3756977,105,105)
{
URL="m.vk.com"
CookieManager="1"
link(onFinish,10441648:doValue,[(142,118)(142,111)])
}
Add(BlockFind,2088869,189,105)
{
IncludeBlock=1
StartBlock="<form method="POST" action=""
EndBlock="" novalidate>"
link(onSearch,10160540:doValue,[])
link(Text,10441648:Value,[(195,93)(174,93)(174,149)(153,149)])
}
Add(HTTPClient,9945044,91,301)
{
Method=1
CookieManager="1"
Point(PostData)
Point(CurrentURL)
link(URL,10160540:Value,[(97,219)(237,219)])
link(onHeadersAvail,1371141:doEvent1,[(130,307)(130,360)])
link(PostData,10991859:GetData,[])
}
Add(FormatStr,12695101,63,245)
{
Mask="email: %1\r\npass: %2"
link(onFString,10991859:doData,[])
link(Str1,11112831:Text,[(69,223)(48,223)])
link(Str2,15051529:Text,[(76,209)(90,209)])
}
Add(EventFromData,10991859,105,245)
{
link(onEvent,12695101:doString,[(149,251)(149,239)(51,239)(51,251)])
}
Add(Memory,10160540,231,105)
{
link(onData,9945044:doLoadString,[(309,111)(309,282)(79,282)(79,307)])
}
Add(Memory,10441648,147,105)
{
link(onData,2088869:doSearch,[])
}
Add(HTTPClient,9170198,168,301)
{
CookieManager="1"
link(URL,1199746:Var2,[])
link(onFinish,11284404:doEvent1,[])
}
Add(RichEdit,13429692,301,308)
{
Left=-5
Top=50
Width=380
Height=205
ScrollBars=2
}
Add(CookieManager,12064456,21,63)
{
}
Add(Hub,11284404,273,308)
{
InCount=2
OutCount=1
link(onEvent1,13429692:doAdd,[])
}
Add(Hub,1371141,137,354)
{
link(onEvent1,9170198:doLoadString,[(162,360)(162,307)])
link(onEvent2,13543457:doData,[(211,367)(211,328)])
}
Add(DoData,13543457,224,322)
{
link(onEventData,11284404:doEvent2,[(264,328)(264,321)])
link(Data,1199746:Var3,[(230,289)])
}
Add(GetDataEx,1199746,168,284)
{
Angle=3
link(Data,9945044:CurrentURL,[(142,289)(142,345)(111,345)])
}


Редактировалось 1 раз(а), последний 2020-03-23 17:54:26
карма: 0

0
Сообщение
...
Прикрепленные файлы
(файлы не залиты)