Delphi - pasar codigo DBGrid a cxGrid, seleccionar una fila

hola que tal

tengo problemas para pasar un codigo de un DBGrid a un cxGrid, este codigo hase que se seleccione toda la fila y la pinte de un color

y siempre esta presente aunque quitemos el foco del DBGrid

el codigo es:
evento "OnDrawColumCell"
Código Delphi:

if (gdSelected in state) then
begin
(sender as TDBGrid).Canvas.Font.color:=(tool.color xor clWhite);
(sender as TDBGrid).Canvas.Brush.color:=tool.color;
end;
(sender as TDBGrid).DefaultDrawColumnCell(Rect,DataCol,column,state);


bien
eh leido la ayuda del cxGrid pero no le eh podido ahyar
vi algo de ACanvas en igual de Sender pero a la hora de compilar me decia que no era el mismo tipo

si alguien sabe algo les agradeseria cual quier ayuda de como pasar ese codigo aun cxGrid

tambien probe en los eventos DRAW del cxGrid pero no puede conseguir nada

de hante mano gracias