ForumSezioni

Librerie: Mappatura dei file senza DLL - pagina 9

Nuovo commento

Grazie all'autore per la libreria!

Ho creato delle funzioni per trasferire qualsiasi dato. Lo script qui sotto mostra il loro lavoro sull'esempio delle zecche

#include <MemMapLib.mqh>
#include <TypeToBytes.mqh>

// Alloca una memoria di lunghezza specifica per i dati. 
template <typename T>
bool GetFileMemory( CMemMapFile* &FileMemory, const int Amount, const string FileName = "Local\\test" )
{
  FileMemory = new CMemMapFile;
    
  return(FileMemory.Open(FileName, sizeof(T) * Amount + sizeof(int) + HEAD_MEM, modeCreate) == 0);
}

// Scrive i dati nella memoria
template <typename T>
void DataSave( CMemMapFile* FileMemory, const T &Data[], const bool FromBegin = true  )
{
  const int Size = ArraySize(Data) * sizeof(T);
  uchar Bytes[];
  
  _ArrayCopy(Bytes, _R(Size).Bytes);              // Registrazione della quantità 
  _ArrayCopy(Bytes, _R(Data).Bytes, sizeof(int)); // Registrazione dei dati

  if (FromBegin)
    FileMemory.Seek(0, SEEK_SET);

  FileMemory.Write(Bytes, ArraySize(Bytes)); // Scarico di tutto in memoria
  
  return;
}

// Legge i dati dalla memoria
template <typename T>
int DataLoad( CMemMapFile* FileMemory, T &Data[], const bool FromBegin = true )
{
  if (FromBegin)
    FileMemory.Seek(0, SEEK_SET);

  uchar Bytes[];
          
  FileMemory.Read(Bytes, sizeof(int));  // Leggere la quantità di dati dalla memoria 
  FileMemory.Read(Bytes, _R(Bytes)[0]); // Ho i dati stessi

  _ArrayCopy(Data, Bytes);              // Scarico dei dati in un array
  
  return(ArraySize(Data));
}

#define  AMOUNT 1000

#define  TOSTRING(A) #A + " = " + (string)(A) + " "

// Esempio di trasmissione di tick
void OnStart()
{  
  CMemMapFile* FileMemory;
  
  if (GetFileMemory<MqlTick>(FileMemory, AMOUNT))
  {
    MqlTick Ticks4Save[];    
    CopyTicks(_Symbol, Ticks4Save, COPY_TICKS_INFO, 0, AMOUNT);
    
    DataSave(FileMemory, Ticks4Save);
    
    MqlTick Ticks4Load[];    
    
    if (DataLoad(FileMemory, Ticks4Load) > 0)    
      Print(TOSTRING((_R(Ticks4Save) == Ticks4Load)) +
            TOSTRING(ArraySize(Ticks4Save)) +
            TOSTRING(ArraySize(Ticks4Load)));
     
    FileMemory.Close();   
  }
  
  delete FileMemory;
}


Risultato

(_R(Ticks4Save)==Ticks4Load) = true ArraySize(Ticks4Save) = 1000 ArraySize(Ticks4Load) = 1000

Aggiornamento della versione

1.02 - modificata la copia delle strutture in unione

File:
MemMapLib.mqh  31 kb
o_o:

Aggiornamento della versione

1.02 - modificata la copia delle strutture in unione

Sostituito il file e pubblicato
o_o:
Forse non hai tenuto conto del fatto che qui nella classe i primi byte sono allocati per l'intestazione, dove è memorizzata la dimensione del file?

Potete dirmi se sto facendo bene?

Voglio scrivere/leggere il doppio. Poiché mql4 non sa come copiare le strutture l'una nell'altra, ho fatto diversamente.

Nel tuo script non c'erano chiamate con questo tipo di parametri e li ho aggiunti:

	// 64
        long memcpy(double &Destination[], uchar &Source[], int Length);
        long memcpy(uchar &Destination[], double &Source[], int Length);

E questo codice ha funzionato senza errori:

void OnStart()
  {
   CMemMapFile hmem;
   long err=hmem.Open("Local\\test",111,modeCreate);

   double src[5]={1.2,3.4,5.6,7.8,9.0};
   int cnt=sizeof(double)*ArraySize(src);
   uchar data[5*8];
   memcpy(data,src,cnt);
   err=hmem.Write(data,ArraySize(data));



   ArrayInitialize(data,0);
   hmem.Seek(0,SEEK_SET);
   err=hmem.Read(data,ArraySize(data));

   ArrayInitialize(src,0);
   memcpy(src,data,cnt);
   
   hmem.Close();
  }


1. Posso usare memcpy con questi tipi di parametri? Se "è tutto sbagliato, rifacciamolo" no, allora come scrivere/leggere il doppio?

2. Funzionerà per 32 bit?

Denis Lysenko:

Voglio scrivere/leggere il doppio. Poiché mql4 non sa come copiare le strutture l'una nell'altra, ho fatto diversamente.

ora è possibile copiare le strutture con l'aiuto di union


1. Posso usare memcpy con questi tipi di parametri?

2. Funzionerà per i 32 bit?

sì

Customer:

Se l'ultimo trade è in perdita aumentano il lotto


2 operazioni per sessione ma apertura e chiusura esempio apertura 8.00 GBP /usd e chiusura 16.00 gbp /usd

o_o:

le strutture possono ora essere copiate usando l'unione


Per qualche motivo il commento precedente è stato cancellato.

   union dbl_u
     {
      double            value;
     };
   union uchar_u
     {
      uchar              value[8];
     };
     
   dbl_u dbl;
   uchar_u chr;
   
   dbl = chr;
Restituisce: '=' - uso illegale dell'operazione
Denis Lysenko:

Per qualche motivo il commento precedente è stato cancellato.

Dà: '=' - uso illegale dell'operazione
Leggere il manuale. Le unioni non si usano in questo modo.

Per favore, aiutatemi a capire perché il seguente codice non funziona:

#include <MemMapLib.mqh>

//------------------------------------------------------------------ OnStart
void OnStart()
{
        CMemMapFile hmem;
        long err=hmem.Open("Local\\test",111,modeCreate);
        
        uchar data[],data2[];
        StringToCharArray("0.12243;0.44565;1.32452",data);
        err=hmem.Write(data,ArraySize(data));

   ArrayResize(data2,ArraySize(data));
        ArrayInitialize(data2,0);
        hmem.Seek(0,SEEK_SET);
        err=hmem.Read(data2,ArraySize(data2));
        
        Print("Read result=",CharArrayToString(data2));
        
        hmem.Close();
        
   Print("New cycle of open memory file");
   err=hmem.Open("Local\\test",111,modeOpen);
   Print("err1=",err);  
        
        ArrayInitialize(data2,0);
        hmem.Seek(0,SEEK_SET);
        err=hmem.Read(data2,ArraySize(data2));
        Print("err2=",err);     
        
        Print("after reading data2=",CharArrayToString(data2));
        
        hmem.Close();   
                
}

Il risultato del codice:

2017.09.20 11:13:54.981 memmap_MY_02_question EURUSD,H1: after reading data2=
2017.09.20 11:13:54.981 memmap_MY_02_question EURUSD,H1: err2=-1
2017.09.20 11:13:54.981 memmap_MY_02_question EURUSD,H1: err1=0
2017.09.20 11:13:54.981 memmap_MY_02_question EURUSD,H1: New cycle of open memory file
2017.09.20 11:13:54.981 memmap_MY_02_question EURUSD,H1: Read result=0.12243;0.44565;1.32452

Perché non riesco a leggere il contenuto di un file in memoria dopo averlo riaperto?

Eseguo lo script nel terminale MT4.

Иван:

Perché non riesco a leggere il contenuto di un file in memoria dopo averlo riaperto?

Almeno non si cerca di leggere un file in memoria dopo aver riavviato il computer...

123456789101112
Nuovo commento