procedure TForm1.btn1Click(Sender: TObject);
var HTTP:THTTPSend;
    HTML:TStringList;
    Data:TStringStream;
begin
  HTTP:=THTTPSend.Create;
  HTML:=TStringList.Create;
  HTTP.HTTPMethod('GET','www.instagram.com');
  token:=StringReplace(HTTP.Cookies[0], 'csrftoken=','',[rfReplaceAll]);
  //HTTP.Clear;
  Data:=TStringStream.Create('username=loginnnn&password=passsssss');
  HTTP.Document.LoadFromStream(Data);
  HTTP.UserAgent:='User-Agent : Mozilla/5.0 (Windows NT 6.1; WOW64; rv:43.0) Gecko/20100101 Firefox/43.0';
  HTTP.Headers.Add('X-CSRFToken : ' + token);
  HTTP.Headers.Add('X-Instagram-AJAX : 1');
  HTTP.Headers.Add('X-Requested-With : XMLHttpRequest');
  HTTP.Headers.Add('Referer : https://www.instagram.com/');
  HTTP.MimeType:='application/x-www-form-urlencoded; charset=UTF-8';

  HTTP.HTTPMethod('POST','www.instagram.com/accounts/login/ajax');
  mmo1.Text:=HTTP.Headers.Text;
  HTTP.Clear;

  HTTP.Headers.Add('X-CSRFToken : ' + token);
  HTTP.HTTPMethod('POST','www.instagram.com/web/likes/116374461280/like/');
  HTTP.Clear;
  ShowMessage(HTTP.Headers.Text);
  HTTP.Clear;
end;