Вот я пытался, но это совсем не то. http := THTTPSend.Create; http.Protocol := '1.1'; http.AddPortNumberToHost := False; startTime := EncodeDateTime(1970, 1, 1, 0, 0, 0, 0); currTime := Now; msec1 := MilliSecondsBetween(currTime, StartTime); params := 'session[username_or_email]=' + edLogin.Text; params := params + '&session[password]=' + edPass.Text; params := params + '&redirect_after_login='; http.Document.Write(Pointer(params)^, Length(params)); http.MimeType := 'application/x-www-form-urlencoded'; url := 'https://twitter.com/sessions?phx=1'; http.HTTPMethod('POST', url); HeadersToList(http.Headers); url := trim(http.Headers.Values['Location']); http.Clear; http.HTTPMethod('GET', url); str := ReadStrFromStream(http.Document, http.Document.Size);
Для работы с https в Synapse необходимо подключить модуль ssl_openssl. Проверь, подключен ли он у тебя.