Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Чересстрочная раскраская DBGrid в фильтре [D6, Paradox]

Dim!S © (2003-04-07 07:21:00)
Мастера!
Как реализовать чересстрочную раскраску DBGrid"a для отфильтрованных записей (БД Paradox)

Использование TTable.RecNo не работает...

Dim!S (2003-04-07 11:47:00) [1]
> Соловьев
спасибо, но не использую...

Соловьев (2003-04-07 11:38:00) [2]
EhLib

Dim!S (2003-04-07 11:36:00) [3]
Спасибо, попробую...

AlexSV (2003-04-07 11:16:00) [4]

> Dim!S (07.04.03 08:24)
> Может есть способ проще?

Есть, можно и так:
type
THackGrid = class(TDBGrid);

procedureTForm1.DBGrid1DrawColumnCell(Sender: TObject; constRect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
var
HackGrid: THackGrid;
begin
HackGrid := THackGrid(Sender);
withHackGrid do begin
if((DataLink.ActiveRecord mod 2) = 0) then
Canvas.Brush.Color := clRed
else
Canvas.Brush.Color := clGreen;
DefaultDrawColumnCell(Rect, DataCol, Column, State);
end;
end;

Dim!S (2003-04-07 10:15:00) [5]
Неужели с этим никто не сталкивался???

Dim!S (2003-04-07 08:24:00) [6]
Хорошо, а как это сделать?
Попиксельно вычислять размер ячейки, их количество в гриде...
Это сколько ж вычислений...

Может есть способ проще?

AlexZ (2003-04-07 07:53:00) [7]
Ну и бог с ним, с набором. Смотри четная(нечетная) ли запись в самом гриде.

Dim!S (2003-04-07 07:46:00) [8]
Спасибо, я знаю что в OnDrawColumnCell, вопрос в другом: Как узнать что запись четная(нечетная) в отфильтрованномнаборе данных?

AlexZ (2003-04-07 07:38:00) [9]
Обрабатывай событие OnDrawColumnCell. На Королевстве статья есть, и даже не одна.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »