Discussion :

[spikto]

Bonjour, j'avais posté ici pour avoir une fonction de recherche je le eu mais le problème c'est que le fonction de recherche que l'on ma fourni marche que si le mot est exacte à 100% (même les majuscules), j'ai essayé d'arranger la fonction à ma sauce mais cela n'a pas marcher.
Avez-vous des pistes ou une fonction qui pourrai resoudre mon problème ?

Je vous mets la fonction que l'on m'avait donné.

Code :

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

1
2
3
4
5
6
7
8
 
function StringGridIndexOf(Grid : TStringGrid; Str : string; Col : integer) : integer; 
begin 
  Result := 0; 
  while Result < Grid.RowCount do 
    if Grid.Cells[Col, Result] = Str then exit else inc(Result); 
  Result := -1; 
end;

[jmjmjm]

si tu ne veux pas avoir de probleme avec les majuscules et minuscules lorsque tu veux tester cle avec Cle
fait

Code :

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

1
2
 
if CLE=uppercase(Cle)

en gros passe tout tes paramettre par Uppercase ca te resoudra ce probleme