Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Работа с сетью в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 01.06.2010, 07:48   #1
RazoRIII
 
Регистрация: 25.01.2010
Сообщений: 3
По умолчанию TICQClient

использую TICQClient 1.34.2 и Delphi 2010
пытаюсь залогиниться в отдельном потоке
Код:
    ICQClient1 := ticqclient.Create(nil);
    ICQClient1.uin := StrToInt(uin);
    ICQClient1.ProxyAuth := false;
    ICQClient1.Password := pass;
    ICQClient1.ConvertToPlaintext := true;
    ICQClient1.securelogin := false;
    ICQClient1.ICQServer := '';
    ICQClient1.ICQServerViaHTTP := '';
    ICQClient1.ICQPort := 5190;
    ICQClient1.ICQPortViaHTTP := 80;
    ICQClient1.DisableDirectConnections := false;
    ICQClient1.TypingNotifications := false;
    ICQClient1.PortRangeFirst := 3000;
    ICQClient1.PortRangeLast := 50000;
    ICQClient1.Avatars := false;
    ICQClient1.ConnectionTimeout := 0;
    ICQClient1.Login();
    if ICQClient1.LoggedIn then
    ....
не логинится, уин в онлайн не выходит.
Скачал демо программу - все нормально логиниться, но при замене компонента с теми же настройками (удалил - вставил) - больше не заходит.
Что делать?

Последний раз редактировалось RazoRIII; 01.06.2010 в 08:07.
RazoRIII вне форума Ответить с цитированием
Старый 01.06.2010, 12:02   #2
MyIE
Форумчанин
 
Аватар для MyIE
 
Регистрация: 02.01.2010
Сообщений: 127
По умолчанию

Исследуй на разницу в настройках твоего кода и демо-версии
0_o
MyIE вне форума Ответить с цитированием
Старый 01.06.2010, 12:32   #3
RazoRIII
 
Регистрация: 25.01.2010
Сообщений: 3
По умолчанию

Цитата:
Сообщение от MyIE Посмотреть сообщение
Исследуй на разницу в настройках твоего кода и демо-версии
разницы нет абсолютно.
причем демо код тоже перестает работать.
RazoRIII вне форума Ответить с цитированием
Старый 01.06.2010, 13:00   #4
raxp
Старожил
 
Регистрация: 29.09.2009
Сообщений: 9,713
По умолчанию

Код:
ICQClient1.Login();
    if ICQClient1.LoggedIn then
мягко говоря странно, что вы проверяете на вход сразу-же... внимательней методы и события компонента посмотрите в help-е и собственно demo пример
Разработки и научно-технические публикации :: Видеоблог :: Твиттер
Radar systems engineer & Software developer of industrial automation
raxp вне форума Ответить с цитированием
Старый 01.06.2010, 14:02   #5
Pasha_Sh
Форумчанин
 
Аватар для Pasha_Sh
 
Регистрация: 16.05.2010
Сообщений: 137
По умолчанию

Код:
 if ICQClient1.LoggedIn then
Это вроде надо использовать в процедуре OnLogin

Да, и зачем так много кода? Можно обойтись тремя строчками
osu
Pasha_Sh вне форума Ответить с цитированием
Старый 01.06.2010, 14:17   #6
raxp
Старожил
 
Регистрация: 29.09.2009
Сообщений: 9,713
По умолчанию

хм... так много кода где? вы очевидно ни в генофонд не заглядывали, ни демку не смотрели
Код:
// init
...
ICQClient1.Login();
...

procedure icqsock.Login(Sender: TObject);
begin
 // подключились
end;
Разработки и научно-технические публикации :: Видеоблог :: Твиттер
Radar systems engineer & Software developer of industrial automation
raxp вне форума Ответить с цитированием
Старый 20.09.2011, 19:29   #7
hacker_007
Пользователь
 
Регистрация: 18.09.2011
Сообщений: 17
Радость Массовая расылка сообщений TICQClient.

))))))))))
hacker_007 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
TICQClient ошибка KoBaL Работа с сетью в Delphi 0 01.05.2010 16:13
TICQClient Maxs Работа с сетью в Delphi 1 18.11.2009 16:44
TICQClient __@cmd@__ Компоненты Delphi 3 20.08.2009 16:03
Работа с TICQClient dolphin705 Работа с сетью в Delphi 8 16.10.2008 18:00
TICQClient Xandr Работа с сетью в Delphi 11 04.07.2008 13:28