Recherche:

Tu as testé ? J'ai relu ma fonction elle fait bien une recherche et renvoie le numéro de ligne où se trouve le mot et -1 s'il ne trouve rien. Elle ne pourra jamais renvoyer le nombre de ligne !

Voici une fonction qui le fait :

function StringGridIndexOf(Grid : TStringGrid; Str : string; Col : integer) : integer;
begin
Result := 0;
while Result < Grid.RowCount do
if...