DBGrid DefaultDrawDataCell - Delphi Sources FAQ

Главная страница сайта "Delphi Sources"

Раздел "Исходники"

Форум

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;

Источник - Проект "Delphi World" © Выпуск 2002 - 2004
Автор проекта: Акулов Николай

| индивидуальные курсы по бухучету |