Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Сети > Залогинится на icq.com

Автор: XSInet 14.1.2006, 11:20

Подскажите пожалуйста, как можно подобно обычному клиенту ICQ залогинится под обределённым уином (произвести соединение) ?

Автор: DemoCode 14.1.2006, 11:29

Здесь подробно описано с примером: http://icq2000cc.hobi.ru/page5.html

Автор: iddqd 16.1.2006, 15:08

Также есть готовые компоненты.
На http://www.cobans.net поищи...

Автор: S6T6N6 16.1.2006, 15:49

Код


procedure TForm1.Button1Click(Sender: TObject);
begin
  if (StrToInt(UINEdit.Text) = 0) or (PasswordEdit.Text = '') then
  begin
    MessageBox(0, 'Введи логин и пароль', 'Нет входу', MB_ICONERROR);
    Exit;
  end;
  ICQClient1.ConvertToPlaintext := True;
  ICQClient1.ICQServer := 'login.icq.com';
  ICQClient1.ICQPort := 5190;
  ICQClient1.Password := PasswordEdit.Text;
  ICQClient1.UIN := StrToInt(UINEdit.Text);
  ICQClient1.Login;
  EventMemo.Lines.Add('Подсоединение к серверу аси...');
end;

Автор: FRAGNATIC 16.1.2006, 15:55

S6T6N6
тока ты забыл указать что это при помои компонента =)
XSInet
на сайте http://www.rejetto.com/&RQ есть исходники этого ICQ клиента
в них можешь посмотреть как залогинится и не тока.