|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
20.06.2008, 13:14 | #1 |
Новичок
Джуниор
Регистрация: 06.05.2008
Сообщений: 2
|
icq бот на Delphi
Кто нибудь знает как распознать и обработать сервисное сообщение: неправильный номер/пароль чтобы знать что введен неправильный пароль. Т. е. я ввел uin и pass(пароль ввел неправильный) а при подключении допустим в memo высветилось : пароль неверен.компонент - icqclient.
|
20.06.2008, 15:40 | #2 |
Delphi/C++/C#
Участник клуба
Регистрация: 29.10.2006
Сообщений: 1,972
|
Вы используете TICQClient? Если да, то читайте мануалы компонента. Там написаны все события, в том числе и событие OnLogin, которое возникает только тогда, когда вы авторизовались на сервере ICQ (т.е. логин и пасс верные).
|
20.06.2008, 16:30 | #3 |
Новичок
Джуниор
Регистрация: 06.05.2008
Сообщений: 2
|
я искал, но везде токо основные функции описаны. там же вроде когда коннект не идет то должна выполняться процедура ICQClient1ConnectionError я в ней пишу чтобы выводил сообщение о неправильном пароле, но когда запускаю он токо пишет что коннектится и никакого сообщения не вылазит
procedure TForm1.Button1Click(Sender: TObject); begin icqclient1.Password:=edit2.Text; icqclient1.UIN:=strtoint(edit1.text ); if not ICQClient1.LoggedIn then begin label1.Caption := 'Connecting...'; ICQClient1.Login(NewStatus); end ; end; procedure TForm1.ICQClient1Login(Sender: TObject); begin label1.Caption:='зашли'; end; procedure TForm1.ICQClient1ConnectionError(Se nder: TObject); begin label1.Caption:='----------'; end; |
20.06.2008, 17:20 | #4 |
Delphi/C++/C#
Участник клуба
Регистрация: 29.10.2006
Сообщений: 1,972
|
М... Только что смотрел.
Затрудняюсь если честно. Есть OnError и OnConnectionFailed. Первое возникает при ошибке, второе при ошибке подключения. При неверном пассе/логине происходят оба события. Сначала OnError потом OnConnectionFailed. Больше ничем не смогу помочь, ах да... Выложу ещё мануал P.S.: В архиве русская и английская версии. |
20.06.2008, 19:58 | #5 |
Форумчанин
Регистрация: 06.09.2007
Сообщений: 239
|
Попробуй в runtime создай его и назначь событие ICQClient.OnError сам
Код:
Memo.Text = Ошибка: Bad password Последний раз редактировалось Ring0Sn; 20.06.2008 в 20:02. |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Программа-тест в Delphi) скиньте))а то програмку здавать преподу надо,и самой хочется понять Delphi | Верчик | Помощь студентам | 9 | 02.03.2009 17:46 |
Delphi. Как нарисовать в Delphi два движущиеся шара с определенной скоростью? | redred | Общие вопросы Delphi | 10 | 11.12.2007 10:43 |
Как открыть БД, написанную в Delphi если нf другой машине Delphi нет? | dagarik | БД в Delphi | 7 | 22.10.2007 17:54 |