Советы по Delphi

         

DBGrid DefaultDrawDataCell


TDBGrid имеет недокументированный в электронной справке метод DefaultDrawDataCell.

Вот пример его использования:

    procedure TForm1.DBGrid1DrawDataCell(Sender: TObject; const Rect: TRect; Field: TField; State: TGridDrawState); begin with Sender as TDBGrid do begin Canvas.Font.Color := clRed; DefaultDrawDataCell(Rect, Field, State); end; end;

[000676]



Содержание раздела