Problema com a mudança de Cor na linha do DBGrid

Pesquisei no forum e achei uma rotina interessante para mudança da cor da linha de um DBGrid, dei um Ctrl+C e um Ctrl+V nela, porém ela não funciona fui nas origens e descobri que o programa em momento algum chama a procedure, o que devo fazer para que ela funcione?

Agradecimentos.