indy10 发送接收utf8

 IdUDPClient1.Send('255.255.255.255',8265,sCmd ,IndyTextEncoding(TEncoding.UTF8));


procedure TSDIAppForm.IdUDPServer1UDPRead(AThread: TIdUDPListenerThread;
  const AData: TIdBytes; ABinding: TIdSocketHandle);

   var
   lsMsg:String;

 begin
  //lsMsg:=  BytesToString(AData);

  lsMsg:=  enutf8.GetString(adata);
end;