Советы по Delphi
DBGrid DefaultDrawDataCell
TDBGrid имеет недокументированный в электронной справке метод DefaultDrawDataCell.
Вот пример его использования:
| procedure TForm1.DBGrid1DrawDataCell(Sender: TObject; const Rect: TRect; Field: TField; State: TGridDrawState);beginwith Sender as TDBGrid do beginCanvas.Font.Color := clRed;DefaultDrawDataCell(Rect, Field, State);end;end; |
[000676]
