怪事，怪事，居然会自动发送数据

Question

procedure TForm1.btn1Click(Sender: TObject);
begin
  ClientSocket1.Socket.SendText('我发送过来了');
end;procedure TForm1.FormCreate(Sender: TObject);
begin
  try
    ServerSocket1.Port:=8000;
    ServerSocket1.Open;
    StatusBar1.Panels[0].Text:='8000 打开端口成功';
  except
    StatusBar1.Panels[0].Text:='8000 打开端口失败';
  end;  ClientSocket1.Address:='10.143.107.58';
  ClientSocket1.Port:=8000;
  ClientSocket1.Open;
end;procedure TForm1.ServerSocket1ClientRead(Sender: TObject;
  Socket: TCustomWinSocket);
var
  S:string;
begin
  s:=Socket.ReceiveText;
  if not(s='内部管理') then
    Memo1.Lines.Add(s);
end;如何屏蔽这个[内部管理]
用以上方法不行

Answer 1

不用啊，它好像是自动发送的这个数据，我如何去屏蔽