Разноцветный RxDBGrid для таблицы для Advantage TDataSet

← →
kyn66 © (2006-03-27 14:53) [0]

Уважаемые мастера, вошло в привычку использовать RxDBGrid для рисования его полосатым, за счет того, что у него есть событие GetCellParams. Делаю так :
procedure TMainFrm.RxDBGrid1GetCellParams(Sender: TObject; Field: TField; AFont: TFont; var Background: TColor; Highlight: Boolean); begin if KvTable.RecordCount <> 0 then begin if (KvTable.RecNo mod 2 <> 0) then Background := clBtnFace; if Highlight then begin AFont.Color := clBlack; AFont.Style := [fsBold]; Background := clMoneyGreen; end; end; end;
При использовании таблиц Paradox - все нормально. Но когда я решил отойти от BDE перейти на Advantage Local Server, то при прикреплении этого события - данные таблицы отрисовываются с безобразнейшим торможением, буд-то строки "впечатываются через таймер". В чем причина такого поведения при отрисовке? Когда я смотрю пример arc32(ver 8.0), входящий в комплект, то там грид показан полосатый, правда используется там wwDBGrid из комплекто InfoPower 3000. В чем дело?

← →
SuperBug (2006-04-07 18:50) [1]

Было что-то похожее при использовнии АДО , происходило из-за того,что при отрисовке при обращении к полю записи (здесь к KvTable.RecNo ) происходило перемещение курсора датасете, может и тут оно же...

← →
SuperBug (2006-04-07 18:58) [2]

точнее при отрисовке в цвете следующей записи произходил перевод курсора, это инициировало новый этап отрисовки ,откуда и создавалось ощущение мелькания как при использовани таймера. Не знаю,то же ли тут, но по описанию схоже....

← →
mr.il © (2006-04-07 19:46) [3]

Помоему тормоз здесь
KvTable.RecordCount

или RecNo - скорее всего.

Разноцветный RxDBGrid для таблицы для Advantage TDataSet Найти похожие ветки