Надыбал пример из книги , а работать не хочет ? Это уже второй такой случай .
Что я делаю не так . DefaultDrowing установил в true .

procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
if (Column.FieldName='legth') then begin
DBGrid1.Canvas.Brush.Color:=clRed;
DBGrid1.Canvas.Font.Color:=clYellow;
DBGrid1.Canvas.Font.Style:=[fsItalic];
DBGrid1.Canvas.FillRect(Rect);
end;
end;


Ну и тогда второй пример :

procedure TForm1.ButtonClick(Sender: TObject);
begin
case RadioGroup1.ItemIndex of
0: Table.indexName:=’x’;
1: Table.indexName:=’y’;
end;


case RadioGroup2.ItemIndex of
0: Table.indexDefs[Table1.indexDefs.indexOf(Table.indexName)].Options:=
Table.indexDefs[Table1.indexDefs.indexOf(Table.indexName)].Options + [ixDescending]

1: Table.indexDefs[Table1.indexDefs.indexOf(Table.indexName)].Options:=
Table.indexDefs[Table1.indexDefs.indexOf(Table.indexName)].Options - [ixDescending];
end;
end;

Первая часть ( RadioGroup1) работает чудно , а вторая - ноль эмоций. Понятно , что проще
Сделать теми же RadioGroup , но через Tquery , но почему не работает ?
И какое различие между Tquery и Ttable , если один пень с локальной базой рублюсь , как собственно тут надо прикидывать ?