[nikcpp]

Сообщение от Aristarh Dark

Го в раздел работа

Ты хоть бы посматривал что я попросил, а потом отправлял в раздел работа. Я разбираюсь а это для примера попросил.

Вот столкнулся с проблемой не могу понять в чем ошибка

сервер

Код:

procedure TForm1.IdTCPServer1Execute(AContext: TIdContext);
begin
idtcpserver1.DefaultPort:=4001;
 idtcpserver1.Active:=true;
end;

клиент

Код:

procedure TForm1.FormCreate(Sender: TObject);
begin
idtcpclient1.Host:='127.0.0.1';
idtcpclient1.Port:=4001;
idtcpclient1.Connect;
end;

При старте клиента выдает ошибку, Socket Error # 10061
Connection refused

в чем тут может быть проблема?