TIdTCPServer 收发包问题 用JAVA访问Delphi

我用JAVA写的一个客户端访问DELPHI的服务端
client端
s=new Socket(IP,Port); 
s.setSoTimeout(3000);
//发送数据
OutputStreamWriter w = new OutputStreamWriter(s.getOutputStream()); 
w.write(xmlStr); 
w.flush();
         
//获取数据
InputStream in = s.getInputStream();
byte[] buffer = new byte[in.available()];
in.read(buffer);
xmlStr = new String(buffer);
  
//关闭数据
in.close();
w.close();server端
procedure TfrmMain.IdTCPServerExecute(AThread: TIdPeerThread);
begin
  Memo.Lines.Add(AThread.Connection.CurrentReadBuffer());
  AThread.Connection.WriteLn('数据接收成功！');
end;我往服务端发送的数据能收到，但是在执行AThread.Connection.WriteLn('数据接收成功！'); 这句时会抛出异常：为什么？我需要获取到包后解析包再告诉客户端这个包的情况。