Скачать: CL | DM;

Разноцветный 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

---

← →
kyn66 ©   (2006-04-10 17:24) [4]

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.043 c