Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Определение минимальной даты в дереве (TcxDBTreeList) / 2 сообщений из 2, страница 1 из 1
15.07.2019, 12:30
    #39837404
Romka-Fes
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Определение минимальной даты в дереве (TcxDBTreeList)
Доброго всем времени суток!
Есть клиент-сервер декстопное приложение.
Есть задача - нужно в дереве (TcxDBTreeList,привязано к таблице с Parent-Child) на каждой "ветке" дерева определить минимальную дату из некоего поля с датой. С учётом всех уровней "выше", т.е. рекурсивно.

Варианты делать это на сервере не подходят, так как важно с учётом применения всякого рода кастомных фильтров на клиенте, пересчитывать эти минимальные даты.

Подскажите пожалуйста, если кто в курсе, куда-бы посмотреть, дабы не делать свой велосипед?

Спасибо!
...
Рейтинг: 0 / 0
15.07.2019, 13:14
    #39837417
Virtual Student
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Определение минимальной даты в дереве (TcxDBTreeList)
Romka-Fes,

Что-то типа этого.
Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
procedure TfrmBlaBla.DoFilterByBlaBla(Column: TcxDBTreeListColumn; const ADate: TDateTime);
var Index, ParentId: Integer;
    ANode: TcxTreeListNode;
begin
  for Index:=0 to Tree.AbsoluteCount-1 do begin
    ANode := Tree.AbsoluteItems[Index];
    ParentId := Tree.DataController.GetNodeValue(ANode, tlPid.ItemIndex);
    // ... извлечение нужных полей, условия, сравнения и все такое ...
  end;
  Filtered := True;
  ExpandTree;
end;
...
Рейтинг: 0 / 0
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Определение минимальной даты в дереве (TcxDBTreeList) / 2 сообщений из 2, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]