[ Delphi / Pascal ] — начинающим: задаем вопросы (архивная - 2015)

Это не ошибка а исключение. Ответ 302 означает переадрессацию. Какие библиотеки используются в разработке? Каким образом добавляете заголовки? Информативнее...

 

Решил проблему. Оказалось не весь сайт на https, а только форма авторизации, и когда я обращался к главной (https://instagram.com), меня перенаправляло на http://instagram.com

Возникла другая проблема: сперва я шлю Get-запрос, дабы получить куки, потом Post-запрос авторизации. Но в первом случае куки почему-то не присваиваются.

Работаю в XE2, Indy версии 10.5.8.0

 

Ребята, забыл, как решается проблема переключения версии протокола в Indy 10.5.7.
Задаю свойству компоненту типа TidHttp ProtocolVersion := pv1_1, но запрос всеравно меет вид POST /registration/step1?from_login=1 HTTP/1.0. Запамятовал как лечится...

 

Может, они просто и не должны выдаваться?
Обычно куки даются именно после авторизации.А не авторизованному пользователю смысла то их особого нет давать.

 

Как раз-таки сайт устанавливает сессию, возвращая определенные куки. Проблема решилась апдейтом Indy

 

Как отправить в параметре Post запроса ссылку?
Data.Add('guestbook_text=http://partnerka.com?id=123' );
Сниффер показывает что оправляется пара ключ-значение:
id - 123.
Использую Idhttp

 

Ссылку нужно кодировать
http://stackoverflow.com/questions/776302/standard-url-encode-function

 

http://i.imgur.com/8H3BSF2.png
ShowMessage срабатывает, а запрос не отправляется. Что делаю не так?

 

Вангую exeption в try блоке, вставь

Code:

on E : Exception do
       ShowMessage(E.ClassName+' поднята ошибка, с сообщением : '+E.Message); 

в блок except и посмотри что выведется.
И код лучше текстом сюда вставлять, а не картинкой.

 

не помогло

 

Что на снифере теперь?

 

отсылаю запрос в через senapse, есть текст

HTML:

VID:=('[size=24]'+sEdit4.Text+'[/size]'#13#10#13#10'[img=right]'+sEdit5.Text+'[/img]'#13#10#13#10'[b]Ãîä âûïóñêà[/b]:.....

но доходит только [size
в чём дело, может надо перекодировать во чтото?

 

Если через Get отсылаешь, то нужно кодировать UrlEncode

 

У меня тоже возникла эта проблема, и тоже кодирование не помогло.
Юзал вот эту функцию: http://www.delphisources.ru/pages/faq/base/encode_url.html
Как выглядит строка в headers:

 

Хз. покажи что во вкладке Raw Stream

 

Обошелся стандартным .referer:=

 

Не могу передать переменную в поток. Делаю так:

Объявляю поток:

Code:

  TUnfollowing = class(TThread)
  private
    num_token: Integer;
    del_ids: Tstringlist;
    rslt: String;
  protected
    procedure Execute; override;
  public
    constructor Create(num_token: Integer; del_ids: Tstringlist);
  end;

Описываю конструктор:

Code:

constructor TUnfollowing.Create(num_token: Integer; del_ids: Tstringlist);
begin
  inherited Create(False);
  FreeOnTerminate := False;
end;

Вызываю поток:

Code:

    UnfollowingT := TUnfollowing.Create(5, del_ids);
    UnfollowingT.Resume;

Выполняю что-либо в потоке:

Code:

procedure TUnfollowing.Execute;
begin
showmessage(inttostr(num_token));
end;

Должно вывести цифру 5, но выводит 0 (как-будто переменную не передали). Что делаю не так?

 

Как в Chromium Embedded найти все ссылки?
есть ли там подобие OleObject.Document.Links...

Delphi Chromium Embedded 3
Как в нём очистить Кеш? ClearHistory в нём нет... (хотя в ранней версии это было)

 

[Delphi] ВОпрос по ListView

Собственно, вопрос:
Как сделать так, чтобы при добавлении файла (EXE) в ListView, отображалась его иконка, как на приведенном скрине?
Поиск в гугле проблему не решил. Если есть у кого примерчик в виде кода, буду благодарен.

 

LoadIcon function?
ExtractIconEx function?