4Nov/143

Delphi добавить контакт в Skype. Библиотека Skype4COM

Добавить новый контакт с помощью Delphi не так сложно.
Все что нам потребуется - это библиотека предоставляющая интерфейс работы со скайпом через COM под названием Skype4COM и менее 10 строчек кода в итоге

1
2
3
4
5
6
7
8
9
10

var
  Skype: OleVariant;
  Friends: OleVariant;
begin
  Skype := CreateOleObject('Skype4COM.Skype');
  Friends := Skype.SearchForUsers('User_Login');
 
  if Friends.Count >= 1 then
    Friends.Item[1].BuddyStatus := 2;
end;

Скачать библиотеку Skype4COM можно тут

Возникли проблемы в работе со скайпом? Задай свой вопрос в комментариях.

Метки записи: , , , , Оставить комментарий
Комментарии (3) Пинги (0)
  1. Владимир
    Ноябрь 21st, 2014 - 16:33

    Я чет не понял что ты тут делаешь, у меня не работает.
    Friends := Skype.SearchForUsers(‘User_Login’); – запускаешь поиск по логину, только такой команды нет

    if Friends.Count >= 1 then
    Friends.Item[1].BuddyStatus := 2; – это вообще не понятно для чего?

    ( REPLY )
    • master
      Ноябрь 21st, 2014 - 20:14

      Я не знаю почему у тебя нет SearchForUsers, скачай версию библиотеки по ссылке из статьи.
      это Friends.Item[1].BuddyStatus := 2; на сколько я помню добавляет человека в наш список контактов.

      ( REPLY )
  2. Владимир
    Ноябрь 21st, 2014 - 16:35

    чтобы вызвать добавление я делаю так
    skype.Client.OpenAuthorizationDialog(‘username’);
    skype.Client.OpenAddContactDialog(‘username’);
    но дальше незнаю как нажать кнопку в описании апи ничего не нашел по этому поводу, кроме как через winapi жать

    ( REPLY )

Оставить комментарий

CAPTCHA image
*

Нет обратных ссылок на эту запись.

» «

Архив

Последние записи

Последние комментарии

Облако тегов

+1 Delphi Delphi XE durrrr Full Tilt Poker Google GoogleImageFinder RusToLat SEO Sitemap Generator Tom Dwan Windows 8 WordPress YouTube Бан Блеф Блог Блоггинг Вадим Зеланд В добрый путь Голографическая Вселенная Диплом Карта сайта Обратные ссылки Парсер Покер Покер бот Продвижение Работа Ранжирование Раскрутка сайта Создание Трансерфинг реальности Транслитерация Тренажер автокрана Фриланс аннотации видео вирусный маркетинг индексация программа работа в интернете раскрутить сайт раскрутка установка

Страницы

Карта сайта


Яндекс.Метрика