Fórum Como mudo a côr em tempo de execução no DBGrid ?? #276549

Tenho o seguinte código, e não consigo resolver a questão :

[color=green:00fba8f48b] for i:=1 to DataModule2.IBDataSet1.RecordCount do
Begin
for a := 1 to 50 do
Begin
x2 := DaTaModule2.IBDataSet1.FieldByName(´NUM_´+formatFloat(´00´,a)).Value ;
For x1 := 1 to (DataModule2.IBDataSet2.FieldCount)-1 do
If DataModule2.IBDataSet2.FieldByName(´NUM_´+formatFloat(´00´,x1)).Value = x2 then
Contador := Contador + 1 ;

End;[/color:00fba8f48b]

Gostaria de trocar a côr da célula no momento da verificação por uma côr que não é a padrão, ou seja, se o valor comparado ao conteúdo da célula for igual, então muda-se a côr de fundo e texto. Tenho uma linha com 50 números no DbGrid e vou compara-las com vinte números aleatórios, quando um número sorteado é igual ao da célula do DbGrid então a condição de mudança deverá ser executada. Se alguem puder me dar uma dica eu agradeço...