DBGRID DELPHI CAMBIAR COLOR CON UN FDQwery

[kainchu3102]

Hola,buenas gente, queria hacerle una consulta sobre el DBGRID en Delphi
Mi consulta es la siguiente como puedo hacer para que cambien de color las Filas pero segun la consulta que haga con un FDQUERY
Osea con el Drawn Column Perfecto pero cuando voy a hacer una consulta con el FDQUERY las Coloreada vuelve a los colores normales

Código Delphi [-]
procedure TFORMRESULTADOS.DBGRESULTADOSDrawColumnCell(Sender: TObject;
  const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
if DataModule1.FDTRESULTADOS.FieldByName('int_res').AsString <> ''  then
  begin
  DBGRESULTADOS.Canvas.Brush.Color := clMoneyGreen;
   DBGRESULTADOS.Canvas.Font.Color := clWhite;
    DBGRESULTADOS.DefaultDrawColumnCell(Rect, DataCol, Column, State);

Ese el codigo pero veo que estoy utilizando un FDTABLE pero como podria cambiar para que sea un QUERY POR EJEMPLO:

Código Delphi [-]
if DataModule1.FDQBUSQUEDA.FieldByName('int_res').AsString <> ''  then

PERO ME SALE EL ERROR FDTRESULTADOS: field 'int_res' not found