Sockets
Hello!
Люди, помогите пожалуйста!
Работаю с сокетами. Так вот, создаю прослушивающий сокет, устанавливаю
событие, при попытке коннекта вызываю accept и создаю новый сокет и
поток, в котором с ним работаю.
Так вот:
procedure TNetConnectionT.Execute;
Var
A: array[1..3] of char;
A2: array[0..99] of char;
begin
A := '+OK';
send(Sock, A, 3, 0);
While True do
Begin
recv(Sock, A2, 100, 0);
If String(A2) <> '' then LogWrite(String(A), ML_Low);
End;
end;
Теленетюсь на порт, ко мне приходит не +OK, а какая-то ерунда из 3х
символов (каждый раз разная).
А recv ничего не принимает, что бы я не долбил в telnet?
В чём дело-то?
