[Rurr]

не думал что не смогу справится с ней но все же проблема для меня пока что тупиковая уже несколько дней.....
ситуация такая: первым отправляется гет запрос на получение кода страници авторизацци(там есть один из необходимых параметров), дальше составляется пост запрос который отправляется по https, откуда должен произойти рдирект уже на открытое соединение ответом которого будет страница пользователя.
но: при отправке https запроса вместо введенных мною данных отправляется откровенная "какофония"(это при включенном редиректе у компонента) если поддержку редиректа отключить и отправлять запросы самостоятельно результат тот же.
использую: делфи 2010, idhttp, idcookiemanager, IdSSLIOHandlerSocketOpenSSL

мож кто уже разобрался в трабле подкиньте идейку пожалуйста

собственно код

Код:

procedure TForm1.Button1Click(Sender: TObject);
begin
memo1.Text:=idHTTP1.Get('http://www.odnoklassniki.ru');
end;
 
procedure TForm1.Button2Click(Sender: TObject);
var
post:TStringList;
str:string;
n:integer;
begin
post:=TStringList.Create;
post.Add('st.redirect=');
post.Add('st.asr=');
post.Add('st.posted=set');
str:=Memo1.Text;
n:=Pos('originalaction" value="', str)+22;
Delete(str, 1, n);
n:=Pos('"', str);
Delete(str, n, Length(str));
ShowMessage(str);
post.Add('st.originalaction='+Memo1.Text);
post.Add('st.email=oppening@mail.ru');
post.Add('st.password=1vfyfrj');
post.Add('st.fJS=enabled');
post.Add('st.st.screenSize=1280 x 960');
post.Add('st.st.browserSize=797');
post.Add('st.st.flashVer=');
post.Add('button_go=Войти');
memo1.Text:=idHTTP1.Post('https://www.odnoklassniki.ru/https', post);
end;