
09.09.2009, 18:07
|
|
Постоянный
Регистрация: 29.10.2008
Сообщений: 306
Провел на форуме: 1819761
Репутация:
180
|
|
Делфи не знаю, попытался переделать с си++ билдера
stroka:AnsiString;
user:AnsiString;
stroka := idhttp.get();
while(stroka.Pos("<a href=/users/"))
begin
stroka.Delete(1, stroka.Pos("<a href=/users/"));
stroka.Delete(1, stroka.Pos(">"));
memo1.clear();
memo1.lines.add(stroka.SubString(1, stroka.Pos("<") - 1));
end;
в мемо1 получишь список всех юзеров
Последний раз редактировалось M_script_; 09.09.2009 в 18:38..
|
|
|