deiphi 帮助文件中有一个例子看不明白

Question

procedure TMyClientThread.Execute;var
  TheStream: TWinSocketStream;
  buffer: string;
begin
  { create a TWinSocketStream for reading and writing }
  TheStream := TWinSocketStream.Create(ClientSocket1.Socket, 60000);
  try
    { fetch and process commands until the connection or thread is terminated }
    while (not Terminated) and (ClientSocket1.Active) do
    begin
      try
        GetNextRequest(buffer); { GetNextRequest must be a thread-safe method }        { write the request to the server }
        TheStream.Write(buffer, Length(buffer) + 1);
        { continue the communication (eg read a response from the server) }
        ...
      except
        ifnot(ExceptObject is EAbort) then
          Synchronize(HandleThreadException); { you must write HandleThreadException }
      end;
    end;
  finally
   TheStream.Free;
  end;
end;
第三行中  TheStream: TWinSocketStream;
TWinSocketStream是个什么对象，我编译程序是报错TWinSocketStream未定义，如何定义TWinSocketStream，

Answer 1

引入ScktComp 单元就可以了。

Answer 2

使我把TWinSocketStream，写错了少了一个字母