Delphi Support

Туда вводи регулярное выражение

 

Какие же вы линивые и не могёте прочитать даже пару гайдиков.

А теперь можно вопрос всем? Кто-нибудь из задающих вопросы читал хотя бы одну книгу по программированию в среде Delphi ? Что-то подсказывает мне что вы ответите "Нет". Мы тупо берем исходники и х*ячим запросец.. Простите , опять накипело что-то.

 

Ссылку дай откуда парсить....

 

Переменные с произвольными именами. Так что не обращай внимания. Запрос идёт с помощью синапс

Спойлер

Код:

doc:=tstringlist.Create;
 response:=tstringList.Create;
 http.HTTPMethod('GET','http://eav-nod32.********.ru/');
 response.LoadFromStream(http.Document);
 token:=utf8toansi(response.Text);
 reg.Expression:='Пароль: (.*?)<br />Имя пользователя:';
 if reg.Exec(token) then
 repeat
 doc.Add(reg.Match[1])
 until not reg.ExecNext;

 a:=0;

 for I := 0 to doc.Count-1 do
 begin
 html:=doc.Strings[a];
 delete (html,11,pos('<br />',html));
 memo1.Lines.Add(html);
 inc(a);
 end;
  end;

 

Подскажите норм онлайн-учебник

 

на intuit полазий . А лучше скачай Н.Культин "Основы программирования в Delphi"

 

Android97 с нами

 

Дайте плиз кряк http analyzer

 

http://rsload.net/soft/traffic/8299-http-analyzer.html

 

Здравствуйте, хотел бы попросить помощи.
Вообщем решил написать многопоточную программу Letter Search (mail.ru) с http прокси.
Программа работает, но почему то после 100 гудов начинает грузить процессор на 90-100%, до 100 гудов проц. грузит на 7-15%.
Мне кажется что я что-то намудрил с потоками.
Можно дать вам исходник посмотреть в скайп?
Чтобы вы смогли помоч мне, спасибо.