基础的东西,鄙视自己下  TChat=record
    Recver,
    Sender:string[100];
    Content:array[0..8192] of Char;
    ChatTime:TDateTime;
  end;比如将RecvData赋给SendData,如果不能,如何赋值,难道要一个一个取出来然后再赋值