chaine en builder c

**sali lala** · 20/10/2007, 08h11

bonjour qlq1 PEUT m'aide
j'ai 1 pb avec se code en builder

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
 void __fastcall TForm1::Button1Click(TObject *Sender)
{
const String message1="la lettre n'existe pas dans la chîne ";
const String message2="la position da la 1 ère lettre (";
const String message3=") dans la chîne est : ";
String chaine;
int i;
chaine=Edit1->Text;
i=0;
while((chaine[i]==ComboBox1->Text)||(i>chaine.Length())){
i=i+1;}
if(i>chaine.Length())
Edit2->Text=message1;
else
Edit2->Text=message2+ComboBox1->Text+message3+IntToStr(i);
 
}

**henderson** · 20/10/2007, 12h40

Salut !

On pourrait le faire ainsi, ici j'utilise un TLabel (Label1) pour faire écho du résultat :

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
 
AnsiString texte = Edit1->Text;
AnsiString lettre = ComboBox1->Text;
/*
Si on ne doit pas tenir compte de maj/min on rajoute :
texte = texte.UpperCase();
lettre = lettre.UpperCase();
*/
int n = texte.Pos(lettre);
if(n != 0)
    {
    Label1->Caption = "La 1ère position de la lettre (" + ComboBox1->Text +
    // \n pour ajouter une ligne, pour la présentation
    ")\ndans la chaîne est : " + IntToStr(n);
    }
else
    {
    Label1->Caption = "La lettre n'existe pas dans la chaîne !";
    }