Bibliotecas: TypeToBytes - página 6

[Sergey Likho]

O código converte uma estrutura em uma string

#include <Data_String.mqh>
#define  DEFINE_STRING(A)                        \
  struct STRING##A                              \
  {                                             \
  private:                                      \
    short Array[A];                             \
                                                \
  public:                                       \
    void operator =( const string Str )         \
    {                                           \
      ::StringToShortArray(Str, this.Array);    \
      return;                                   \
    }                                           \
                                                \
    string operator []( const int = 0 ) const   \
    {                                           \
      return(::ShortArrayToString(this.Array)); \
    }                                           \
  };
DEFINE_STRING(120) // Um análogo de uma string que tem no máximo 128 caracteres.
#undef  DEFINE_STRING

struct str_Message
  {
   int               cnt;
   bool              res;
   double            ter;
   STRING120          str;
  };
void OnStart()
  {
//---
   str_Message a;
   a.cnt = 10;
   a.res = false;
   a.ter = 20.0123;
   a.str = "hello world";
   Print(DATA_STRING::ToString(str1););
  }

// Результат
//2020.03.31 10:43:18.320	StructTest2 (EURUSD,H1)	CgAAAAClvcEXJgM0QGgAZQBsAGwAbwAgAHcAbwByAGwAZAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA

Como fazer a conversão inversa? (de string para estrutura)

[fxsaber]

Sergey Likho:

O código converte a estrutura em uma string

Como fazer a conversão inversa? (de string para estrutura)

const string Str = DATA_STRING::ToString(a); // Traduziu a estrutura em uma string.

str_Message Tmp[1];

// Obter uma matriz de estruturas a partir da string
if (DATA_STRING::FromString(Str, Tmp))   
{
  ArrayPrint(Tmp);
  Print(Tmp[0].str[]);   
  
  Print(_R(Tmp) == a); // Verificar se os dados correspondem aos dados originais.
}

// Obter a estrutura da string.
// Tmp[0] = DATA_STRING::FromString<str_Message>(Str); // Isso é possível se não houver um operador de atribuição (consulte STRING120::operator =).

[fxsaber]

Outro aplicativo dos recursos da biblioteca.

[Enrique Dangeroux]

//+------------------------------------------------------------------+
//|teste.mq5 |
//|Copyright 2021, MetaQuotes Ltd. |
//| https://www.mql5.com
//+------------------------------------------------------------------+
#property copyright "Copyright 2021, MetaQuotes Ltd."
#property link      "https://www.mql5.com"
#property version   "1.00"

#include <TypeToBytes.mqh> 


CONTAINER <uchar> Container;


int OnInit()
  {
//---

//---
   return(INIT_SUCCEEDED);
  }
//+------------------------------------------------------------------+
//| Função de desinicialização de especialista|
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
  {
//---
   
  }
//+------------------------------------------------------------------+
//| Função de tique de especialista|
//+------------------------------------------------------------------+
void OnTick()
  {
//---
   
  }
//+------------------------------------------------------------------+

A linha de código amarela não está mais sendo compilada. Ela apresenta o seguinte erro (compilação 2980):

Alguma ideia do que poderia resolver o problema?

[fxsaber]

Enrique Dangeroux:

A linha de código amarela não compila mais. Ela gera o seguinte erro (compilação 2980):

Alguma ideia do que poderia resolver o problema?

Fórum sobre negociação, sistemas de negociação automatizados e teste de estratégias de negociação

Bibliotecas: SingleTesterCache

fxsaber, 2021.06.21 02:42 pm.

Em TypeToBytes.mqh, substitua {0} por {} em todos os lugares.

[Enrique Dangeroux]

Obrigado.

[fxsaber]

Atualizado. Contorna um recurso que foi encontrado. Anteriormente, podia afetar negativamente _ArrayCopy e CONTAINER.

[Edgar Akhmadeev]

Escrevi uma função para salvar cadeias de caracteres de qualquer tamanho em variáveis globais usando sua biblioteca. Não entendo tudo, portanto, tenho certeza de que não a usei 100%.

Alguma sugestão de uso mais eficiente?

#include <TypeToBytes.mqh>


//--------------------------------------------------------------------------------------------------
string
GVarGetString(string name) {
        double dbl[];
        
        // Leia as partes da variável: Name, Name(1), Name(2), ...
        for (int i = 0; ; ++i) {
                string s = (i == 0)? "" : "(" + (string)i + ")";
                double t = GlobalVariableGet(name + s);
                if (t == 0)
                        break;
                
                MyArrayResize(dbl, i + 1);
                dbl[i] = t;
        }
        
        uchar tmp0[], tmp[], tmp1[];  
        _ArrayCopy(tmp0, dbl);
        if (tmp0[0] != 0)
                // Não compactado
                return CharArrayToString(tmp0);
        else {
                // Com compressão
                ArrayCopy(tmp, tmp0, 0, 1);
                CryptDecode(CRYPT_ARCH_ZIP, tmp, tmp1, tmp1);
                return CharArrayToString(tmp1);
        }
}


//--------------------------------------------------------------------------------------------------
void
GVarSetString(string name, string val) {
        double dbl[];
        uchar tmp[];
        uchar zero[1];
        int cnt = CryptEncode(CRYPT_ARCH_ZIP, _R(val).Bytes, tmp, tmp);
        if (cnt >= StringLen(val)) {
                // Não compactado
                string str[1];
                str[0] = val;
                _ArrayCopy(dbl, str);
        }
        else {
                // Com compressão
                _ArrayCopy(dbl, zero, 0, 0, 1);         // Byte[0] == 0 - com compressão
                _ArrayCopy(dbl, tmp, 1);                // Dos dados de byte[1]
        }
        
        // Escreva as partes da variável: Name, Name(1), Name(2), ...
        cnt = ArraySize(dbl);
        for (int i = 0; i < cnt; ++i) {
                string s = (i == 0)? "" : "(" + (string)i + ")";
                GlobalVariableSet(name + s, dbl[i]);
        }
        GlobalVariablesFlush();
}

[fxsaber]

Edgar Akhmadeev variáveis globais usando sua biblioteca. Não entendo tudo, portanto, tenho certeza de que não a usei 100%.

Alguma sugestão de uso mais eficiente?

Dê uma olhada nesta opção.

Também seria conveniente usar CONTAINER<double> para variáveis globais .

[Edgar Akhmadeev]

fxsaber #:

Dê uma olhada nesta opção.

Também seria conveniente usar CONTAINER<double> para variáveis globais .

Agradecimentos