ошибка в Host

[anghela]

Делаю клиент-серверное приложение. Использую компоненты TClientSocket? TSrverSocket для передачи данных. Для подключения пишу такой код для кнопки:

 if ClientSocket1.Active then
  begin
    ClientSocket1.Close;
    Exit;
  end;

  ClientSocket1.Host:=78.85.164.232;
  ClientSocket1.Port:=1001;
  ClientSocket1.Open;

Для клиентСокет (это просто для проверки будут данные приходить или нет):

procedure TForm11_oplata_kred.ClientSocket1Connect(Sender: TObject;
  Socket: TCustomWinSocket);
begin
  Socket.SendText('hello');
  ListBox1.Items.Add('< hello');
end;

procedure TForm11_oplata_kred.ClientSocket1Read(Sender: TObject;
  Socket: TCustomWinSocket);
begin
  ListBox1.Items.Add('> ' + Socket.ReceiveText);
end;

procedure TForm11_oplata_kred.Button1Click(Sender: TObject);
begin
  ClientSocket1.Socket.SendText(Edit1_ssud_schet.Text);
  ListBox1.Items.Add('< ' + Edit1_ssud_schet.Text);
end;

Выводит ошибку на Host. Подскажите, как правильно написать

[Mad_Cat]

ClientSocket1.Host:='78.85.164.232';

[anghela]

так ошибку не выдает, но в общем итоге программа выдает ошибку

[Stilet]

так ошибку не выдает, но в общем итоге программа выдает ошибку

Эту фразу следует трактовать буквально тавтологически понимая непонятное непонимая понимаемое?

[anghela]

выходит ошибка: Asynchronous socket error 10061. Process stopped

[Stilet]

Socket Error 10061 Coonection Refused.
У тебя там антивирус или файерволл случано этот порт не гасят?

[anghela]

вроде бы нет, по крайней мере не кричит, что вирус где-то. Пробовала порт менять - не помогает

[Son Of Pain]

А заданный сервер точно принимает подключения от тебя на этом порту? Ошибка говорит о том что нет.

[Stilet]

Да, действительно может сам сервер не хочет принимать?