Código Delphi [-] LMsg := BytesToString(TBytes(AData), 0, -1, TIdTextEncoding.Unicode);
LMsg := BytesToString(TBytes(AData), 0, -1, TIdTextEncoding.Unicode);