Показать сообщение отдельно
  #9  
Старый 15.01.2013, 23:22
caHek-2x caHek-2x вне форума
Прохожий
 
Регистрация: 14.12.2010
Сообщения: 31
Репутация: 11
По умолчанию

ну суть у тебя будет как в примере ...

Код:
objlist.Text:=vk.Response.Text; //в vk.Response находится ответ сервера после выполнения функций
while objlist.Count>0 do begin //цикл будет идти до тех пор пока не пробежит по всему списку id
  id:=Pars('<uid>', objlist[0], '</uid>'); //парсим id
  if Length(id)>5 then vk.friends_add(id, ''); //если это id значит добавляем его
  objlist.Delete(0);
end;
только запрос на список групп ... вместо добавление в друзья .. выход из группы ...
если разберусь че не логиниться и как авторизоваться .. то набросаю готовый пример ...
Ответить с цитированием