Код:
procedure TForm14.DBGrid16DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
// Красим нечетные строки
IF TDBGrid(Sender).DataSource.DataSet.RecNo mod 2 = 1
Then TDBGrid(Sender).Canvas.Brush.Color:=RGB(220,220,220);
// Восстанавливаем выделение текущей позиции курсора
IF gdSelected IN State
Then Begin
TDBGrid(Sender).Canvas.Brush.Color:= clHighLight;
TDBGrid(Sender).Canvas.Font.Color := clHighLightText;
End;
// Просим GRID перерисоваться самому
TDBGrid(Sender).DefaultDrawColumnCell(Rect,DataCol,Column,State);
end;
вот это делает полосатый grid (событие DrawColumnCell), в этом направлении копай)
з.ы. LIKE '%МОСКВА%' отфильтрует такие, например, значения: "1москва", "там москва", "здесь москва1" , "[пробел]москва2"
но не найдет: "москва"