[lmikle]

Ну жеж просто жеж.
Как-то так:

Код:

if ComboBox1.ItemIndex > -1 then
  begin
    For I := 1 To StringGrid1.RowCount-1 Do
      if ComboBox1.Text = StringGrid.Cells[1,I] then // точное сравнение 
        StringGrid1.Cells[3,I] := FloatToStr(StrToFloat(StringGrid1.Cells[3,I]) + 10);
  end