Модераторы: Snowy, Poseidon, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Компонент для работы с api vkontakte.ru, Строго не судите - вторая работа 
:(
    Опции темы
halfhope
Дата 15.5.2011, 20:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 57
Регистрация: 31.5.2010

Репутация: нет
Всего: нет



Написал компонент для D7, для работы с вконтакте api, не судите строго, это моя вторая работа с сетью, а уж тем более и воторой компонент. 

Свойства:
Код

   AppId:string;//application ID
   LoginOrEmail:string;//Логин
   Password:string;//Пароль 
   Proxy:Tproxy;//Настройки прокси
   Scope:TScope;//Маска настроек(прав) для приложения
   ApiServer:TvkApiServer ;//vk.com или vkontakte.ru
   ResponseType: TRespType;//формат ответа XML или JSON
   AppRegDialog:TAppRegDialog;//Настройки диалога получения прав.
   Logined:Boolean;//Залогинен или нет
   Allowed:Boolean;//Получил права или нет


Функции
Код

   function Login: Boolean;//Логин на сайт
   function LogOut:Boolean;//Выход
   function RegisterApplication:Boolean;//Процедура получения прав и ключа доступа
   function AppAlreadyRegistered:Boolean;//Процедура, которая проверяет, установлено ли у пользователя приложение
   function GetApi(method,parameters:string):string;//Возвращает ответ на запрос api функции
   function GetApi(method:string;parameters:TStrings):string;//Возвращает ответ на запрос api функции


События:
Код

   OnAccess;//при получении ключа доступа
   OnLogin;//при авторизации
   OnLogOut;//при выходе


Пример использования:
Код

   if vkCore1.Login then
      if vkCore1.RegisterApplication then
         ShowMessage('Можно выполнять api запросы');


Пример использования api запросов:
Код

   vkCore1.GetApi('friends.get','fields=online,education');


Примечания:
1. Если в Scope указать notify, тогда диалог авторизации будет вылазить каждый раз(рекомендуется убрать)
2. Если в Scope указать offline, тогда через час придется заново выполнять ф-ию RegisterApplication(рекомендуется убрать)
3. Компонент сам перехватывает капчу при api запросах и заново посылает запрос. 
4. Компонент не перехватывает капчу при авторизации.
5. Авторизация идет без использования ssl, ssl применяется только при api запросах.
6. Был написан только для Delphi 7, так что насчет совместимости с другими версиями ничего сказать не могу.

Для работы компонента необходимы:
1. OverbyteICS (http://www.overbyte.be/frame_index.html);
2. AsyncHttp (Мой первый компонент - оболочка для ICS)(ссылка).

Исходники прилагаются:

Присоединённый файл ( Кол-во скачиваний: 93 )
Присоединённый файл  vkCoreLib.rar 526,33 Kb
PM MAIL   Вверх
halfhope
Дата 27.5.2011, 14:18 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 57
Регистрация: 31.5.2010

Репутация: нет
Всего: нет



Не забудьте в настройках своего проекта добавить defines - USE_SSL
PM MAIL   Вверх
metra52
Дата 10.4.2012, 19:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 1
Регистрация: 10.4.2012

Репутация: нет
Всего: нет



У меня написал Delphi 7 - Unsupported OpenSSl version
PM MAIL   Вверх
gonzales
Дата 2.5.2012, 07:56 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 241
Регистрация: 13.3.2006

Репутация: нет
Всего: 2



какой метод авторизации использован? 
--------------------
- мастер, мастер, запорол..., все четыре запорол!!!- я ж тебе только три давал!!!???- да я и образец запорол!!!!
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Сети"
Snowy
Poseidon
MetalFan

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делится вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Snowy, Poseidon, MetalFan.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Сети | Следующая тема »


 




[ Время генерации скрипта: 0.0420 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.