Delphi StringGrid

[Manhunt714]

всем привет, есть стринггрид в нём у меня при максимальном значении, подкрашивается столбец зеленым цветом, так вот мне надо пройтись по всем ячейкам и посмотреть какие ячейки закрашены зеленым как это сделать....
with StringGRid1 do
for r:=1 to RowCount-1 do
for h:=1 to ColCount-1 do
if Canvas.Brush.Color=cllime then
showmessage('asdf');
end;
запускается... но не работает

[Hex1986]

Уважаемый, боюсь там в brush.color последний цвет используемый для закраски стринггрида. надо искать другие методы
1. заново вычислять максимальный значения
2. или использовать дополнительный массив, и при вычислении заносить туда пометки о макс значении

[Manhunt714]

спасибо, понял)