|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
09.09.2009, 09:45 | #1 |
ХРЕНЕЮ с ИНДИ
Пользователь
Регистрация: 08.02.2009
Сообщений: 92
|
Авторизация на ICQ.com
подскажите пж-та как через Инди сокет подключиться (авторизироваться) на icq.com? че то не получается! уверен это очень просто должно быть! спасибо!)))Edit2.Text:='login.icq.c om';
Edit3.Text:='5190'; form1.IdTCPClient1.Host:=form1.Edit 2.Text; form1.IdTCPClient1.Port:=strtoint(f orm1.Edit3.Text); form1.IdTCPClient1.Connect(); ????? form1.IdTCPClient1.Disconnect; ...а как там ему рассказать что мой UIN такой - то, и Password тоже имеется и как пересылать сообщения и принимать?
Велкам! :D http://radiomedtech.ucoz.ru
Последний раз редактировалось 100GRamm; 09.09.2009 в 11:25. |
09.09.2009, 12:36 | #2 |
Старожил
Регистрация: 28.01.2009
Сообщений: 21,000
|
а через idHTTP не проще? а если так то вам нужно посылать HTTP запрос...можно сниффером посмотреть
Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
Программа делает то что написал программист, а не то что он хотел. Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите. |
09.09.2009, 13:09 | #3 |
ХРЕНЕЮ с ИНДИ
Пользователь
Регистрация: 08.02.2009
Сообщений: 92
|
может и проще, но мысль сделать это через сокет, тем более, протокол поддерживается в асе.
Велкам! :D http://radiomedtech.ucoz.ru
|
09.09.2009, 13:57 | #4 |
ХРЕНЕЮ с ИНДИ
Пользователь
Регистрация: 08.02.2009
Сообщений: 92
|
http://dl.web-hack.ru/books/icq_protocol.rar вот че то нашел, но ниче не понял: как этим пользоваться?
Велкам! :D http://radiomedtech.ucoz.ru
|
09.09.2009, 17:04 | #5 |
Старожил
Регистрация: 28.01.2009
Сообщений: 21,000
|
так авторизация на сайте?
или в ICQ?(клиент свой) тот архив, помоему уже устарел Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
Программа делает то что написал программист, а не то что он хотел. Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите. Последний раз редактировалось Пепел Феникса; 09.09.2009 в 17:12. |
09.09.2009, 20:45 | #6 |
ХРЕНЕЮ с ИНДИ
Пользователь
Регистрация: 08.02.2009
Сообщений: 92
|
Пардон)) за не точный вопрос. ..да именно авторизация с цель подключения ипросто передавать через их сеть(icq) команды, да ивобще давно хчется разобраться с асей) хочу читать книжку с компа на телефоне (хоть даже через тот же джимм) Но можно и свою читалку написать(MPascal) хотя и не пробовал еще, PS: архив явно старый - точно знать не могу, но протокол у них уже девтый,вроде, а там вышка-7, но и в товсе равно пока не врубился)))) хотя что - то доходить начало)))
Велкам! :D http://radiomedtech.ucoz.ru
|
09.09.2009, 21:51 | #7 |
Старожил
Регистрация: 28.01.2009
Сообщений: 21,000
|
можно посмотреть компонент TICQClient и из него взять нужное(или его и юзать)
есть еще форум, асечка чтоли..., там много чего нарыть можно Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
Программа делает то что написал программист, а не то что он хотел. Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите. |
11.09.2009, 13:20 | #8 |
ХРЕНЕЮ с ИНДИ
Пользователь
Регистрация: 08.02.2009
Сообщений: 92
|
)))УРА! спасибо! TIcqClient - это вещь! Уже юзаю!
Велкам! :D http://radiomedtech.ucoz.ru
|
11.09.2009, 22:41 | #9 |
ХРЕНЕЮ с ИНДИ
Пользователь
Регистрация: 08.02.2009
Сообщений: 92
|
<<удалено (Квэнди)<< <<= Сдесь есть очень интересное описание с примерами своего клиента ! без компонента TIcqClient, немного устарело но все же интересно для собственного развития(давно искал) Феникс РЕСПЕКТ! за наводку!
Велкам! :D http://radiomedtech.ucoz.ru
Последний раз редактировалось Квэнди; 12.09.2009 в 21:53. |
12.09.2009, 02:46 | #10 |
ХРЕНЕЮ с ИНДИ
Пользователь
Регистрация: 08.02.2009
Сообщений: 92
|
Вот простейший пример исспользования TIcqClient :
//авторизация procedure TForm1.BitBtn1Click(Sender: TObject); begin with form1.ICQClient1 do begin DisableDirectConnections:=true; //connect icqserver:='login.icq.com'; icqport:=5190; UIN:=strtoint(edit1.Text); password:=edit2.Text; Login(); //ready end; //отправка сообщения procedure TForm1.Memo2KeyPress(Sender: TObject; var Key: Char); begin if key=#13 then begin form1.ICQClient1.SendMessage(strtoi nt(listbox1.Items[listbox1.Itemindex]),memo2.Text); form1.Memo1.Lines.Add('от меня > '+listbox1.Items[listbox1.Itemindex]+#13+#10+memo2.text); end end; //получение сообщения procedure TForm1.ICQClient1MessageRecv(Sender : TObject; Msg, UIN: String); begin memo1.Lines.Add('от '+UIN+#13+#10+Msg); end; Вот, впринципе, все что нужно для прием\передачи , но там полно всего еще!
Велкам! :D http://radiomedtech.ucoz.ru
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Авторизация? | Gromsky | PHP | 5 | 07.08.2009 19:27 |
регистрация(авторизация) | street-walker | Общие вопросы Delphi | 11 | 21.04.2009 00:25 |
Авторизация. | Jjoker | Общие вопросы C/C++ | 4 | 28.01.2009 23:17 |
Авторизация | AIst | PHP | 5 | 03.12.2008 20:57 |
Авторизация | justas | Работа с сетью в Delphi | 0 | 21.12.2007 16:16 |