сокет в блокированном режиме [D7, WinXP]
redlord © (2005-03-19 23:23:00)
всем привет
народ как узнать
что 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:00) [1]
:((
Наверх 
ЧАТ |
Орешник |
|
