TICQClient создание простого клиента

[betirsolt]

всем привет,знаю тут есть много тем про это я их читал и в одной теме уже обсуждалась такая же проблема...но там ему дали ссылку на другой компонент и все заработало у него видимо..а у меня этот компонент не устанавливается,пишет что там ошибки,нельзя ли решить эту проблему не меняя компонент TICQClient?? а проблема в следующем

procedure TForm1.ICQClient1Login(Sender: TObject);
begin
EventMemo.Lines.Add('Successfull logon! Try to send a message to someone now!');
end;

procedure TForm1.ICQClient1ConnectionFailed(Sender: TObject);
begin
 EventMemo.Lines.Add('Connection with ICQ server failed');
  LoginBtn.Enabled := True; 
end;

procedure TForm1.sendbtnClick(Sender: TObject);
begin
if (not ICQClient1.LoggedIn) then
  begin
    MessageBox(0, 'Please, login before sending a message', 'Could not send message', MB_ICONERROR);
    Exit;
  end;
 ICQClient1.SendMessage(StrToInt(fruinedit.Text), MsgMemo.Text);
end;

procedure TForm1.ICQClient1MessageRecv(Sender: TObject; Msg, UIN: String);
begin
EventMemo.Lines.Add('You received a message from ' + UIN + ': ' + Msg);
end;

procedure TForm1.loginbtnClick(Sender: TObject);
begin
if (StrToInt(UINEdit.Text) = 0) or (PassEdit.Text = '') then
  begin
    MessageBox(0, 'Please set your UIN & Password', 'Could not login', MB_ICONERROR);
    Exit;
  end;
  LoginBtn.Enabled := False;                      
  ICQClient1.ConvertToPlaintext := True;       
  ICQClient1.ICQServer := 'login.icq.com';     
  ICQClient1.ICQPort := 5190;                    
  ICQClient1.Password := PassEdit.Text;     
  ICQClient1.UIN := StrToInt(UINEdit.Text);      
  ICQClient1.Login;                              
  EventMemo.Lines.Add('Connecting to server...'); 
end;

все компилируется,запускается но не подключается,пишет Connection with ICQ server failed..но если в этот момент я нахожусь в онлайне в другом ICQ клиенте то меня оттуда выкидывет и пишет что учетка используется на другом компе,как тут быть?подскажите,буду очень благодарен

[Voody]

Сообщение от betirsolt

у меня этот компонент не устанавливается,пишет что там ошибки

Сообщение от betirsolt

все компилируется,запускается

вы определитесь: устанавливается компонент или нет

попробуйте:

ICQClient1.ICQServer:='login.oscar.aol.com';
ICQClient1.ICQPort:=433;

если не поможет, напишите версию компонента и версию Delphi

[betirsolt]

Сообщение от Voody

:

ICQClient1.ICQServer:='login.oscar.aol.com';
ICQClient1.ICQPort:=433;

если не поможет, напишите версию компонента и версию Delphi

не помогло..пишет тоже самое,у меня delphi 7 и TICQClient v1.20

[Google2010]

Все дело в том, Имхо, что TICQClient v1.20 не поддерживает нынешний протокол Аськи попробуйте что нибудь из последних версий данного компонента

[betirsolt]

Сообщение от Google2010

Все дело в том, Имхо, что TICQClient v1.20 не поддерживает нынешний протокол Аськи попробуйте что нибудь из последних версий данного компонента

я скачал TICQClient_v1.34.2 но он не хочет устанавливатся,ругается на многочисленные ошибки.....

[Google2010]

я скачал TICQClient_v1.34.2 но он не хочет устанавливатся,ругается на многочисленные ошибки.....

я только что скачал версию 1.35a и все прекрасно поставилось

[betirsolt]

Сообщение от Google2010

я только что скачал версию 1.35a и все прекрасно поставилось

я щас тоже скачал,спасибо всем все работает отлично

[Alemas]

Причиной было обновление добрыми дядями из AOL Corp. протокола ICQ. Нужно как можно чаще обновлять компонент) У меня была та же самая проблема.