17.05.2022, 01:16
|
Модератор
|
|
Регистрация: 17.04.2008
Сообщения: 8,015
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
|
|
Ну жеж просто жеж.
Как-то так:
Код:
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
|