盒子论坛 v2.1

procedure TServerClientThread.ClientExecute;
var
  FDSet: TFDSet;
  TimeVal: TTimeVal;
begin
  while not Terminated and ClientSocket.Connected do
  begin
    FD_ZERO(FDSet);
    FD_SET(ClientSocket.SocketHandle, FDSet);
    TimeVal.tv_sec := 0;
    TimeVal.tv_usec := 500;
    if (select(0, @FDSet, nil, nil, @TimeVal) > 0) and not Terminated then
      if ClientSocket.ReceiveBuf(FDSet, -1) = 0 then Break
      else Synchronize(DoRead);

    //这两行代码是源代码没有的，是不是应该加上？？？
    //***  FD_ZERO(FDSet);
    //***  FD_SET(ClientSocket.SocketHandle, FDSet);

    if (select(0, nil, @FDSet, nil, @TimeVal) > 0) and not Terminated then
      Synchronize(DoWrite);
  end;
end;

select 超时后，会不会把socket从FDSet中移除？需要重新FD_SET 一下？
----------------------------------------------
学无止境

信息

登陆以后才能回复