![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
|||
|
|||
|
Представляю вашему вниманию данный класс на базе ICS компонентов:
Скажу сразу - нет еще многого. Например, нет функций для работы с видео, заметками, новостями, опросами... И еще не ругайте, что все на string'aх. Я сделал это сознательно. Примеры: Авторизация: Код:
var
vk: TVK;
url: string;
begin
vk := TVK.Create;
url := vk.Auth.Authentication('login', 'pass');
if vk.Auth.auth = True then begin
...
end;
...
end;Получение токена: Код:
vk.Auth.GetToken('2416912', '2');
if vk.Auth.token <> '' then begin
...
end;Ошибки: Код:
var
vk: TVK;
ids: TIDs;
id, url: string;
begin
vk := TVK.Create;
...
url := vk.Auth.Authentication('login', 'pass');
if vk.Auth.auth = true then begin
id := vk.Friends.getID(url);
ids := vk.Friends.getFriends(id, vk.Auth.token);
if vk.Friends.Error = '' then begin
...
end;
end;
...
end;ICS компоненты Методы API Расширенные методы API Права приложений В архиве есть демо-приложение "Анализ стены". В дальнейшем буду допиливать и дополнять. Буду рад замечаниям. Последний раз редактировалось ART, 31.07.2011 в 18:32. |
| Эти 4 пользователя(ей) сказали Спасибо ART за это полезное сообщение: | ||