Показать сообщение отдельно
  #1  
Старый 16.07.2014, 17:38
Rakim4ik Rakim4ik вне форума
Прохожий
 
Регистрация: 16.07.2014
Сообщения: 10
Версия Delphi: Delphi XE5
Репутация: 10
По умолчанию Получение капчи и дальнейшее использование

Уже часов 5 себе мозг "имею".
Как получить капчу на регистрацию отсюда : http://money-birds.com/signup ?
Вот что последнее пробовал :

Код:
html:=HTTP.Get('http://money-birds.com/signup');
Delete(html,1,pos('<img src="/captcha.php?rnd=',html)+length('<img src="/captcha.php?rnd='));
Delete(html,pos('"',html),length(html));

stream:=tmemorystream.create;
http.get('http://money-birds.com/captcha.php?rnd='+html,stream);
stream.savetofile('D:\1.png');
stream.free;
image1.picture.loadfromfile('D:\1.png');

Вылетала ошибка :

Помогите, пожалуйста

P.S. И если не сложно, то приведите пример отправки запроса на регистрацию с полученной капчей. А то при каждом новом запросе она же меняется, а я не в куриваю как по другому делать )
Ответить с цитированием