Здравствуйте у меня такая проблема не могу сделать запрос на Https
вот код страницы
Код HTML:
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=koi8-r" />
<title>.: мЙЮОЩК лБВЙОЕФ рПМШЪПЧБФЕМС уРБТЛ</title>
<link rel="stylesheet" type="text/css" href="/main_ru.css" />
<!--[if IE 6]>
<link rel="stylesheet" type="text/css" href="/ie6.css" />
<![endif]-->
</head>
<body>
<h1 class="hide">мЙЮОЩК лБВЙОЕФ рПМШЪПЧБФЕМС</h1>
<form id="loginForm" action='/?lang=ru' method=post>
<p>мПЗЙО <input type="text" name="login" /></p>
<p>рБТПМШ <input type="password" name="password" /></p>
<button type="submit"><img class="hide" src="/img_ru/lkAuthBtn.png" alt="чПКФЙ" /></button>
<div id="loginShade"></div>
</form>
<div class="sparkenish" id="sparkenish">
<div id="sparkenishBalloon">
<img id="sparkenishBalloonLTC" src="/img_ru/lkSparkenishBalloonLTC.png" />
<img id="sparkenishBalloonRTC" src="/img_ru/lkSparkenishBalloonRTC.png" />
<img id="sparkenishBalloonLBC" src="/img_ru/lkSparkenishBalloonLBC.png" />
<img id="sparkenishBalloonRBC" src="/img_ru/lkSparkenishBalloonRBC.png" />
<img id="sparkenishBalloonArrow" src="/img_ru/lkSparkenishBalloonArrow.png" />
<a id="sparkenishBalloonClose" href="#"><img src="/img_ru/lkSparkenishBalloonClose.png" alt="ЪБЛТЩФШ РПНПЭОЙЛБ" /></a>
<p>
дПВТП РПЦБМПЧБФШ Ч МЙЮОЩК ЛБВЙОЕФ! <br>
</p>
</div>
<div id="sparkenishImgCont"><img id="sparkenishImg" src="/img_ru/lkSparkenish.png" alt="рПНПЭОЙЛ УРБТЛ" /></div>
</div>
<script language="javascript" src="/script.js"></script>
</body>
</html>
отсюда для себя я вынул след информацию:
запрс будет сделан с помощью Post запроса
"text" name="login" поле логина
"password" name="password" поле пароля
action='/?lang=ru
вот как я пытаюсь сделать запрос
Код:
procedure TForm1.Button1Click(Sender: TObject);
var
tL: TStringList;
s: String;
begin
tL := TStringList.Create;
tL.Add('text=E_103095');
tL.Add('password=мой пас');
form1.IdHTTP1.Request.Referer:='https://stat.spark-com.ru/';
try
s := IdHTTP1.Post('https://stat.spark-com.ru/?lang=ru',tL);
finally
tL.Free;
end;
memo1.Lines.Add(s);
end;
мой аутпост говорит что приложение запрашивает исходящее соединение LocalHost
далее моё приложение просто виснет
я слышал что для Https нужны какие то Dll ки но я не знаю откуда мне их взять в гугле смотрел .
Не представляю что мне делать.помогите мне пожалуйста .