dbgrid的drawcolumucell属性:
procedure TForm1.dbGrid1DrawColumnCell(Sender: TObject; const 
Rect:TRect;DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
if Table1.FieldByName('Population').AsInteger > 20000000 then
dbGrid1.Canvas.Font.Color := clBlue;
dbGrid1.DefaultDrawColumnCell(Rect, DataCol, Column, State);
end;dbgrid的readonly属性:
dbgrid1.field('fieldname').readonly:=true(fieldname字段不能改)
dbgrid的ontileclick属性:
可以实现排序。