[carmennn]

И так есть исходник проекта, в нем работает получения капчи из сайта.

Но когда хочу получить капчу из другого сайта то получаю ошибку.

И так вот рабочая:

Код:

procedure TForm1.Button1Click(Sender: TObject);
var
 html:WideString;
 Stream:TStream;
 png:TPNGObject;
begin
   try
    png:=TPNGObject.Create;
    html:=IdHTTP1.Get('http://freelance.ru/registration/?cmd=agree');
    Delete(html,1,pos('<td><img src="',html)+length('<td><img src="'));
    Delete(html,pos('" id',html),length(html));
    Stream:=TStringStream.Create(IdHTTP1.Get('http://freelance.ru/'+html));
    png.LoadFromStream(Stream);
    Image1.Picture.Assign(png);
    Stream.Free;
    png.Free;
   except
    on e:Exception do
     begin
      png.Free;
      Stream.Free;
     end;
   end;
end;

А вот когда меняю сайт пишет ошибку:

Код:

html:=IdHTTP1.Get('http://freebitco.in/?op=home');

Помогите разобраться, почему когда меняю адрес то в этой строке пишет ошибку?

Если кто может помочь таким способом с этого сайта (freebitco) вывести капчу на форму Делфи.

[Alegun]

Там (freebitco) нету капчи, во всяком случае в html-коде её не нашёл. Похоже там другой сценарий регистрации

[carmennn]

Сегодня они сменили капчу с recapchi на новую.

Вот что я нашел на сайте:

<div id="adcopy-puzzle-image"><img src="//api.solvemedia.com/papi/media?c=2@Tw5szIz9haroDwT2alQdXZvD-dgNdDOh@Vz5zctG.hq4ENU8bgrS-RX9APTC4lJjosmHPyNRd9Jnm9PevG03yLGg38GRqt3NIZ-d5zRscEfd5KDXxAna6hc-VKEVgv5.2B9A2GZgP1j64T2Vcbyrc1G63mpD4p08SqemSUnd4GWGT5S51QrrNZJgOTJRZhPLjzUjfppGq4a5hH4KUagzmU6eoG0kiV4jF52kXAh9PXMBgXtPPZTbdf5.BWH.Xkvgh934jaqLbKLaPj3G-DvLqIIn7HR2--KGl5Hr3MXMV4SfVYNmGSBvqlR5c23ZH.4luJkhFXIK0uoA;w=300;h=150;fg=000000;bg=f8f8f8" alt="Solve Media Puzzle Challenge" height="150" width="300" id="adcopy-puzzle-image-image"></div>

Теперь нужно изменить тот код в начале поста, для отображения этой капчи на форме.

[Alegun]

Неа, в "обычном" браузере удалением всего лишнего открыть не удаётся, выскакивает медиаеррор, так что это не то

[carmennn]

Помоги пожалуйста, как её загрузить на форму. Может сначала зайти на страницу, потом всю страницу спарсить в переменую, а уже потом искать в ней капчу и вывести на форму?

[Alegun]

Вот из вашего кода выборка, открывается? Если и с другого сайта так же открыть рисунок сможете, тогда и на форму в имидж его передать будет возможно. Здесь загвоздка

[carmennn]

А можете помочь, с кодом. Вроде все так же делать нужно.

[Alegun]

А код-то здесь причём? Там всё просто, сначала грузится форма регистрации, затем из неё выдирается путь до капчи и в конце подгружается сам рисунок. Вот и всё

[NumLock]

а почему один и тот же код должен парсить разные сайты? тэги то жестко забиты. да и сама картинка запросто может быть другого формата.

[Alegun]

Сообщение от NumLock

а почему один и тот же код должен парсить разные сайты?...

Код один, в смысле принцип, но вероятно на другом сайте ява задействована, а это уже наверное через браузер грузить надо

[carmennn]

Кто сможет программно реализовать к этому сайту?
Потому что в делфи уже давно не программировал.
Просто при входе на сайт с парсить капчу и показать её на форме.