PDA

Просмотр полной версии : Авторизация ICQ[delphi]

marcos
31.01.2010, 18:22
Всем привет! Подскажите как средствами TICQClient авторизовывать всех попросившихся?
НTL
31.01.2010, 19:08
авторизовывать всех попросившихся?

Кто? Где? И каким способом просит? Ты бота делаешь?
Eo0
31.01.2010, 19:20
не проще юзать dll'ку от слэша ?
Chrome~
31.01.2010, 22:50
не проще юзать dll'ку от слэша ?
В ней вроде нету такой функции.
marcos
01.02.2010, 04:56
Кто? Где? И каким способом просит? Ты бота делаешь?

Да, пытаюсь написать бота... Точнее уже написал, осталась только эта функция
DjFly
03.02.2010, 14:25
marcos, проще сделать так:
procedure TForm2.AIMClientAddedYou(Sender: TObject; UIN: String); //если тебя добавили
begin
AIMClient.AddContactVisible(StrToInt(Uin));//добавим и мы этого контакта
AIMClient.SendAuthRequest(StrToInt(Uin), 'Авторизируйте бота ;)');//отправим запрос авторизации (если требуется)
AIMClient.SendAuthResponse(StrToInt(Uin), True, '');//скажеи об успешной авторизации
AIMClient.SendYouWereAdded(StrToInt(Uin));//отправим ответ об успешном добавлении в список
lstContactList.Items.Add(Uin); //и собственно добавим uin в КЛ
end;