Skype API Добавление контактов

[bilibian]

Привет, коллеги!

Вторую неделю ищу способ добавления контактов с помощью библиотеки skype4com.

Использовал команды:

skype1.Client.OpenAuthorizationDialog('username');
skype1.Client.OpenAddContactDialog('username');

Первая открывает окно для авторизации, вторая ищет нужный контакт поиском, но как добавить в контакты?

Нашел в сети вот этот код:

procedure TForm1.Button3Click(Sender: TObject);
var
user:IUser;
begin
user.Handle:='lol';
skype.Friends.Add(user);
end;

Код не рабочий и его автор так же искал способ добавления контактов, но решение так и не было найдено.

Документации и в помине нет на офф сайте скайпа.

Подскажите, в какую сторону копать. google и yandex бесполезны в данном вопросе. все форумы уже пролазил.

Есть еще код, но он для Visual Basic и я даже понятия не имею работает ли он и как его перевести на delphi

Dim friends As IUserCollection = refSkype.SearchForUsers("user")
            If friends.Count >= 1 Then
                friends(1).BuddyStatus = TBuddyStatus.budPendingAuthorization
            Else
                MsgBox("Skype User Does Not Exist")
            End If

[Человек_Борща]

В сторону того что MS урезает функциональность скайпа в плане чата и списка контактов, дабы не спамили.

[bilibian]

Сообщение от Человек_Борща

В сторону того что MS урезает функциональность скайпа в плане чата и списка контактов, дабы не спамили.

Есть программы по типу sendex, skypesender и т.д. которые используют api и успешно добавляют контакты автоматически, значит данная возможность не урезана.

[doktor255]

Возможно эти программы работают напрямую с окном скайпа, минуя skypeAPI. Если твоя библиотека этого не может, это не означает, что это вообще невозможно.

[bilibian]

Сообщение от doktor255

Возможно эти программы работают напрямую с окном скайпа, минуя skypeAPI. Если твоя библиотека этого не может, это не означает, что это вообще невозможно.

Эти программы делают это при свернутом скайпе, а если окно свернуто, то напрямую с ним взаимодействовать посредством findwindow не получается.

[doktor255]

Ну тогда ковыряться нужно. ICQ в профиле.

[bilibian]

Сообщение от doktor255

Ну тогда ковыряться нужно. ICQ в профиле.

Хотя нет. с помощью findwindow найти окно удается, вроде как. Теперь необходимо сделать сам запрос, но сейчас с этим потыкался, ничего не выходит.

Добавил в Аське.

[doktor255]

Сообщение от bilibian

Добавил в Аське.

Не добавлял ты меня. Сосредоточься. 6 цифр всего .

[bilibian]

Тема все еще актуальна, решение пока не было найдено!

[bilibian]

С помощью findwindow и findwindowex нахожу нужный блок, в котором содержится блок с текстом для авторизации: "Здравствуйте бла бла бла хочу добавить вас в свой список и т.д.", но вот самой кнопки "Отправить" там нет. Юзал window scanner для поиска, но без успешно.

Помогите ребят.