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;
Partager