Добрый день, есть код
Код:
TGridMainEh = class(TDBGridEh)
procedure TGridMainEh.GetCellParams(Column: TAxisBarEh; AFont: TFont; var Background: TColor; State: TGridDrawState);
begin
if Self.ActiveRecord = Self.row - 1 then
Background := CursorColor;
end;
Работает когда в качестве DataSet - OraQuery, но если в качестве DataSet указать TMemTableEh, который заполнен из OraQuery методом:
Код:
mtData.LoadFromDataSet(oqData, -1, TLoadMode.lmCopy, False);
Тогда подсветка строки активной записи не работает, поскольку mtData.ActiveRecord = 0 всегда, как выкрутиться?