DBGrid цвета

[Steel_rat]

Подскажите как подкрасить определенные строки в Гриде?
У меня есть таблица в ней поле NUM_OUT, нужно подкрасить строчки в гриде, если значение NUM_OUT повторяется хотябы пару раз.
Можно тоже самое реализовать в TdxDBGrid и в TDBGridEh!

[Stilet]

В Delphi world есть замечательные примеры подкрашивания ячейки в DBGrid, ну а TdxDBGrid и в TDBGridEh тоже должны подчиняться описанному там способу - работой с OnDrawCell

[Steel_rat]

Замечательная программка)
Но проблема в том, что в ней описаны стандартные средства, а мне нужно что то оригинальное)

[Steel_rat]

С помощью стандартных средств задачу не решить

[Domovoy]

TdxDBGrid в лёхкую поддаётся раскраске
Пример

procedure TfrmDocumentManager.DBGMainCustomDrawCell(Sender: TObject;
  ACanvas: TCanvas; ARect: TRect; ANode: TdxTreeListNode;
  AColumn: TdxTreeListColumn; ASelected, AFocused, ANewItemRow: Boolean;
  var AText: String; var AColor: TColor; AFont: TFont;
  var AAlignment: TAlignment; var ADone: Boolean);
begin
  if VarAsType(ANode.Values[индекс_колонки],varBoolean) then
    AColor:=clLime
  else
    AColor:=clFuchsia;
end;

Всё очень просто

[Steel_rat]

Domovoy, возможно ли это сделать другим способом (по мимо DrawCell) ?

[Domovoy]

Думаю нет.

[Steel_rat]

те я столкнулся с задачей, которую не возможно решить? я думал такого не бывает

[Domovoy]

Да нет. Просто для решения данной проблемы есть хороший способ и зачем ещё что то выдумывать и изобретать...

[Steel_rat]

Решая задачу в обработчике DrawCell в DBGrid либо нужные строки не окрашиваются, либо такие тормоза, что софтинка 30к строк обрабатывать будет в течении 20 суток.