Discussion :

[Vincent PETIT]

Voilà mon problème:
J'ai dans mon Mémo des caractères Hexa sous 2 digits, provenant d'un logue, séparés par un espace, comme cela: 5A 27 1F
Et j'aimerai faire des retours à la ligne à des endroits précis.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
void __fastcall TForm1::Button5Click(TObject *Sender)
{
int InsQR,InsATR;
AnsiString MefQR=Memo6->Text;
for(int Stop=0;Stop<MefQR.Length()+1;Stop++)
 {
  if((MefQR.IsDelimiter("3",Stop))&&(MefQR.IsDelimiter("H",Stop+1))==true)
   {
    InsATR=Stop;
   }
  if((MefQR.IsDelimiter("B",Stop))&&(MefQR.IsDelimiter("H",Stop+1))&&(MefQR.IsDelimiter("H",Stop+3))&&(MefQR.IsDelimiter("0",Stop+4)))
   {
    InsQR=Stop;
   }
 }
}

Avec se code je sais par exemple à quelles caractères commence la question, BH H0 etc..., la réponse puis la 2 eme question etc...
Bon code fonctionne bien j'ai fais plusieur essai.

Mais je voudrais faire des retours chariots, pour une mise en forme, au commencement de chaque question et pour cela j'ai les variables InsATR et InsQR qui représente la place des caractères ou je dois faire des retours chariots dans mon Memo.
Merci de votre aide.

[MadMakII]

Tu as essayé avec '\n' ou les caractères 10 et 13 ?

[Greybird]

Pour rajouter ton retour chariot, fait :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 
void __fastcall TForm1::Button5Click(TObject *Sender) 
{ 
  AnsiString MefQR=Memo6->Text; 
  for(int Stop=0;Stop<MefQR.Length()+1;Stop++) 
  { 
    if((MefQR.IsDelimiter("3",Stop))&&(MefQR.IsDelimiter("H",Stop+1))) 
    {
      MefQR.Insert("\r\n",Stop+1);
      Stop+=3;
    }
    else 
    {
      if((MefQR.IsDelimiter("B",Stop))&&(MefQR.IsDelimiter("H",Stop+1))&&(MefQR.IsDelimiter("H",Stop+3))&&(MefQR.IsDelimiter("0",Stop+4))) 
      { 
        MefQR.Insert("\r\n",Stop+1);
        Stop+=6; 
      }
    } 
  } 
}

Cordialement,
Arnaud

[Vincent PETIT]

Merci beaucoup, j'avais essayé avec "\n" mais ça ne fonctionné pas, alors je vais essayer ta proposition GreyBird avec "\r\n".

[Vincent PETIT]

Ca fonctionne très bien, merci.
J'ai modifié 1 chose, car je voulais faire un retour chariot en début du caractère trouvé donc de

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MefQR.Insert("\r\n",Stop+1);

je passe à

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MefQR.Insert("\r\n",Stop);

. Je dois avoué que je n'aurai jamais pensé à mettre "\r\n"
Mais j'aimerai une explication:
Pourquoi

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Stop+=3;

et

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Stop+=6;

?

[Greybird]

En fait, cela vient de la description de ton affichage que tu as donné
Tu as dit que ton Memo contenait des valeur sous la forme xx xx xx xx.
Une fois que tu as trouvé ton code question (ou l'autre), tu as ajouté des caractères avant la position où tu es. Il faut donc avancer ton Stop du nombre de caractères que tu as insérés. Ici 2 (\r\n).
Cependant, en faisant ceci, tu te replace directement sur le code que tu as déjà detecté. Il faut donc avancer. Tant qu'à faire, autant passer au bloc de deux caractères suivant : Cela revient à avancer de 3.
Il faut donc que Stop+=4 (le Stop++ du for va agir ensuite) (et non pas Stop+=3, comme fait dans le code que je t'ai envoyé ; il marchait mais n'était pas super optimisé, car il se placait sur le deuxième caractère du bloc que tu avait détecté. )
Pour la deuxième détection, c pareil : +2 pour sauter les caractères que tu as insérés, +6 pour sauter les 4 chiffres qui composent le code détecté.
Donc Stop+=7, à la place de Stop+=6 (qui était foireux lui aussi)

Voilà. J'espère que toutes ces explications te seront utiles.

Cordialement,
Arnaud

[Vincent PETIT]

ok, en faite c'était le "\r\n" qui me chiffonné. je te remerci encore pour ton explication. Elle était très claire.

[Greybird]

En fait /r/n : /r c retour en début de ligne et /n c retour à la ligne.
Avec cette syntaxe tu es sûr à 100% du passage à la ligne alors qu'avec /n c plus, disons, aléatoire

Cordialement,
Arnaud