Discussion :

[ludojojo]

Bonjour,
Je cherche à savoir comment l'on peut faire pour tester le contenu d'une cellule d'un StringGrid.
Je m'explique, mon tableau contient différents champs dont une colonne avec des adresses de messagerie. Je voudrais savoir comment faire pour que je puisse savoir si le contenue de la cellule qui est sélectionnée est une adresse mail ou non... Pour information j'utilise un bouton pour faire mon envoi de mail, donc j'ai besoin de faire ce test uniquement lors de l'envoi d'un mail.
J'ai pensé utilisé une boucle for comme cela :

Code :

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

1
2
3
4
5
6
7
bool TForm_Tab_Clients::Recherche_Caractere(AnsiString Chaine, AnsiString Caractere_recherche)
{
  for(int i =0; i<StrLen(Chaine);i++)
  {
    if(Chaine[i] == Caractere_recherche) return true;
  }
}

mais je n'arrive pas à utilisé la fonction StrLen avec un AnsiString... alors je suis un peut perdu...

Merci par avance

[pottiez]

Utilise tout simplement Chaine.length()

[agamitsudo]

Bonjour,

Tout d'abord pour la longueur:
Un AnsiString a accès à une méthode Length

Code :

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

Chaine.Length()

Pour la recherche d'un caractère, tu peux utiliser:

Code :

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

1
2
3
 
Chaine.AnsiPos("@"); 
// qui retourne la position du premier "@" trouvé, et 0 sinon.

A+
Agamitsudo.

[ludojojo]

En effet ce simple code suffit :

Code :

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

1
2
3
4
5
6
7
 
bool Chaine_trouvee = false;
bool TForm_Tab_Clients::Recherche_Caractere(AnsiString Chaine, AnsiString Caractere_recherche)
{
  if(Chaine.AnsiPos(Caractere_recherche)) return Chaine_trouvee = true;
  else return Chaine_trouvee = false;
}

Merci encore.

[ludojojo]

J'aimerais adapter ce code pour pouvoir rechercher un caractère dans tout mon tableau, ou plutôt plusieurs caractères.
Exemple si je cherche exe dans mon champs de recherche de mon tableau je voudrai pouvoir trouver exemple...
peut on faire quelque chose de ce type?

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
int TForm_Tab_Clients::Recherche(AnsiString Element_recherche)
{
 for (int i = 0;i < StringGrid->ColCount ;i++)
 {
  for (int j = 0; j<StringGrid->RowCount ;j++)
  {
   Recherche_Caractere(StringGrid->Cells[i][j],Element_recherche);
   if(Chaine_trouvee)
   {
       return Num_colonne = i;
   }
  }
 }
}
//-----------------------------------------------------------------------------
 
bool TForm_Tab_Clients::Recherche_Caractere(AnsiString Chaine, AnsiString Caractere_recherche)
{
  if(Chaine.AnsiPos(Caractere_recherche)) return Chaine_trouvee = true; 
  else return Chaine_trouvee = false;
}

Merci par avance

[pottiez]

Dans ta fonction recherché tu tes trompé dans ton if :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
int TForm_Tab_Clients::Recherche(AnsiString Element_recherche)
{
 for (int i = 0;i < StringGrid->ColCount ;i++)
 {
  for (int j = 0; j<StringGrid->RowCount ;j++)
  {
   if(Recherche_Caractere(StringGrid->Cells[i][j],Element_recherche))
   {
       return Num_colonne = i;
   }
  }
 }
}

[ludojojo]

Merci