Delphi 高手进,dbgrid 问题

dxdbgrid中我已经实现了奇数行一种颜色,偶数行一种颜色,但是在这个基础上我想实现在选中某一行时,这一行的颜色变成红色的,为什么这段过不去呢:
if ((State = [gdSelected]) or (State=[gdSelected,gdFocused])) then file://选中行用红色显示

dxDbGrid1.Canvas.Brush.color:=clRed;

dxDbGrid1.Canvas.pen.mode:=pmMask;

DbGrid1.DefaultDrawColumnCell (Rect, DataCol, Column, State);

这段代码为什么通过不了啊,
提示:Undeclared identifier:State 要么就说:Incompatible types
是不是需要引用哪个系统单元啊?

delphi高手进 sql delphi高手进 delphi编程高手进 delphi高手进下 DELPHI高手进~~ Delphi中的问题，高手进 Delphi 高手进,dbgrid 问题 delphi高手进,求救啊 delphi 高手 DELPHI该怎么学??高手进