![]() |
|
Модераторы: Snowy, Poseidon, MetalFan |
![]()
|
|
| Coderr |
|
|||
![]() Бывалый ![]() Профиль Группа: Участник Сообщений: 234 Регистрация: 27.1.2006 Где: Vesnet Репутация: нет Всего: 0 |
Раскажите, пожалуйста, о дополнительных статусах (типа утка, сердце, мужик в каске, джойстик, кружка с пивом...) Как определить какой доп статус сейчас у клиента, а также как получить их текст?
--------------------
Кодинг - это стиль жизни! |
|||
|
||||
| Coderr |
|
|||
![]() Бывалый ![]() Профиль Группа: Участник Сообщений: 234 Регистрация: 27.1.2006 Где: Vesnet Репутация: нет Всего: 0 |
Опять тишина... Неужели я ставлю нерешаемые задачи?
--------------------
Кодинг - это стиль жизни! |
|||
|
||||
| WolfON |
|
|||
![]() Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 604 Регистрация: 19.7.2004 Репутация: нет Всего: 8 |
В TICQClient их просто-напросто еще нет.
Описание протокола: http://www.micq.org/ICQ-OSCAR-Protocol-v7-v8-v9/ |
|||
|
||||
| Coderr |
|
|||
![]() Бывалый ![]() Профиль Группа: Участник Сообщений: 234 Регистрация: 27.1.2006 Где: Vesnet Репутация: нет Всего: 0 |
Я понимаю, что в TICQClient этого нет. Если б было, я не не спрашивал. А можно как-нибудь по-русски? А то по ссылке ничего непонятно...
--------------------
Кодинг - это стиль жизни! |
|||
|
||||
| WolfON |
|
|||
![]() Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 604 Регистрация: 19.7.2004 Репутация: нет Всего: 8 |
если нету - читай описание протокола и сделай сам )
по-русски нигде не видел |
|||
|
||||
| yXo |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 6 Регистрация: 17.3.2007 Репутация: нет Всего: нет |
Описание протокола лучше всего читать тут - http://iserverd.khstu.ru/oscar/. Там смотришь соответствующий snac на заход уина или на смену статуса, парсишь нужный tlv и вперед.
Вот список всех доп. статусов: "NONE" => NULL, "ANGRY" => "01D8D7EE-AC3B-492A-A58D-D3D877E66B92", "DUCK" => "5A581EA1-E580-430C-A06F-612298B7E4C7", "TIRED" => "83C9B78E-77E7-4378-B2C5-FB6CFCC35BEC", "PARTY" => "E601E41C-3373-4BD1-BC06-811D6C323D81", "BEER" => "8C50DBAE-81ED-4786-ACCA-16CC3213C7B7", "THINK" => "3FB0BD36-AF3B-4A60-9EEF-CF190F6A5A7F", "EAT" => "F8E8D7B2-82C4-4142-90F8-10C6CE0A89A6", "TV" => "80537DE2-A467-4A76-B354-6DFD075F5EC6", "FRIENDS" => "F18AB52E-DC57-491D-99DC-6444502457AF", "COFFEE" => "1B78AE31-FA0B-4D38-93D1-997EEEAFB218", "MUSIC" => "61BEE0DD-8BDD-475D-8DEE-5F4BAACF19A7", "BUSINESS" => "488E1489-5C63-3861-CA4A-0882AA77CE7A", "CINEMA" => "107A9A18-1232-4DA4-B6CD-0879DB780F09", "FUNNY" => "6F493098-4F7C-4AFF-A276-34A03BCEAEA7", "PHONE" => "1292E550-1B64-4F66-B206-B29AF378E48D", "GAMES" => "D4A611D0-8F01-4EC0-9223-C5B6BEC6CCF0", "COLLEGE" => "609D52F8-A29A-49A6-B2A0-2524C5E9D260", "SHOP" => "63627337-A03F-49FF-80E5-F709CDE0A4EE", "SICK" => "1F7A4071-BF3B-4E60-BC32-4C5787B04CF1", "SLEEP" => "785E8C48-40D3-4C65-886F-04CF3F3F43DF", "SURF" => "A6ED557E-6BF7-44D4-A5D4-D2E7D95CE81F", "INTERNET" => "12D07E3E-F885-489E-8E97-A72A6551E58D", "WORK" => "BA74DB3E-9E24-434B-87B6-2F6B8DFEE50F", "TYPING" => "634F6BD8-ADD2-4AA1-AAB9-115BC26D05A1", "UNK" => "2CE0E4E5-7C64-4370-9C3A-7A1CE878A7DC", "PPC" => "101117C9-A3B0-40f9-81AC-49E159FBD5D4", "MOBILE" => "160C60BB-DD44-43f3-9140-050F00E6C009", "MAN" => "6443C6AF-2260-4517-B58C-D7DF8E290352", "WC" => "16F5B76F-A9D2-4035-8CC5-C084703C98FA" "SMOKE" => "3FB0BD36-AF3B-4A60-9EEF-CF190F6A5A7E", "SEX" => "E601E41C-3373-4BD1-BC06811D6C323D82", "POISK" => "631436FF-3F8A-40D0-A5CB7B66E051B364", "GEOMETRY" =>"B70867F5-3825-4327-A1FFCF4CC1939797", "LOVE" => "DDCF0EA9-7195-4048-A9C6413206D6F280" |
|||
|
||||
| Coderr |
|
|||
![]() Бывалый ![]() Профиль Группа: Участник Сообщений: 234 Регистрация: 27.1.2006 Где: Vesnet Репутация: нет Всего: 0 |
yXo, шикарно! Теперь бы ещё разобраться, как бы это всё воткнуть в компонент и куда - было бы ваще идеально...
--------------------
Кодинг - это стиль жизни! |
|||
|
||||
| yXo |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 6 Регистрация: 17.3.2007 Репутация: нет Всего: нет |
Да все просто берем допустим событие, когда юзер выходит в онлайн snac 030b, читаем описание по ссылке которую давал выше:
.. 00 0D word TLV.Type(0x0D) - user capabilities xx xx word TLV.Length xx ..... xx CLSIDs Client capabilities list .. Вот среди этих капабилитес и есть доп. статус. Открываешь icqclient.pas и ищешь procedure TICQClient.HSnac030B и в ней: $0D: {User Capabilities} begin s:= GetWStr(Pkt); И на пример составляешь массив доп. статусов и начинаешь искать в нем. Идея такая дальше копай сам ;) |
|||
|
||||
| Coderr |
|
|||
![]() Бывалый ![]() Профиль Группа: Участник Сообщений: 234 Регистрация: 27.1.2006 Где: Vesnet Репутация: нет Всего: 0 |
yXo,
--------------------
Кодинг - это стиль жизни! |
|||
|
||||
| GORA |
|
|||
![]() Новичок Профиль Группа: Участник Сообщений: 23 Регистрация: 28.8.2007 Где: Stavropol Репутация: нет Всего: нет |
Ну что у кого-нибудь есть дельные предложения как скрестить TICQClient и X-статусы?
Это сообщение отредактировал(а) GORA - 30.8.2007, 20:18 |
|||
|
||||
| GORA |
|
|||
![]() Новичок Профиль Группа: Участник Сообщений: 23 Регистрация: 28.8.2007 Где: Stavropol Репутация: нет Всего: нет |
Кто нибудь в курсе, как говорится, хоть в какую сторону копать? нужно ли вносить изменения в ICQClient.pas? либо они устанавливаются так же как и доп. квиповские статусы?
|
|||
|
||||
![]()
|
| Правила форума "Delphi: Сети" | |
|
|
Запрещено: 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делится вскрытыми компонентами
Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Snowy, Poseidon, MetalFan. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Delphi: Сети | Следующая тема » |
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |