Discussion :

[trikker]

je cherche une fonction qui me permettrais de compter un caractere dans une chaine de caractere !

exemple : chaine = le petit oiseau caractere = e resultat = 3

[ero-sennin]

Tout d'abord, bonjour , et bienvenue sur les forums de Developpez.com,

Pour ton soucis, un petit tour dans la FAQ et le tour est joué : FAQ (rajouter StrUtils dans les uses)

A+

[trikker]

je ne vois toujour pas comment je peux faire pour compter :-(

[ero-sennin]

je ne vois toujour pas comment je peux faire pour compter :-(

Tu as la fonction ...

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Function Compte(Const SubStr:String;Const s:String):Integer;
Var i:Integer;
begin
  Result:=0;
  i:=0;
  Repeat
    i:=PosEx(SubStr,s,i+1);
    If i<>0 Then
      Inc(Result);
  Until i=0;
End;

Suffit de la mettre en place ...

Code :

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

1
2
3
4
5
var
 nb : integer;
begin
  nb = Compte('e','Mon pseudo est ero-sennin');
end;

Tu as bien mis dans les uses StrUtils ?
Tu as quel version de Delphi ?

[trikker]

j'avais oublie de mettre StrUtils dans user c'est moche ! pourtant je pensais l'avoir fait !

merci a toi !

[ero-sennin]

j'avais oublie de mettre StrUtils dans user c'est moche ! pourtant je pensais l'avoir fait !

merci a toi !

Pas de soucis
Penses au petit stp