сокет в блокированном режиме

← →
redlord (2005-03-19 23:23) [0]

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

procedure TForm1.TcpServer1Accept(Sender: TObject;
ClientSocket: TCustomIpClient);

begin
while clientsocket.BytesReceived < 1 do
begin
sleep(50);
end;
showwmessage("есть данные");

end;

← →
redlord (2005-03-20 02:25) [1]

:((

сокет в блокированном режиме Найти похожие ветки