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;
|