0

в cxgrid есть два уровня. Как развернуть все записи первого уровня? вот мой грид

0

4 ответа 4

0
var ARecord: TcxCustomGridRecord;
i : Integer;
begin
  i := 1;
    while i <= Self.ods1.RecordCount  do begin
      ARecord := TcxGridTableController(cxgrdlvlGrid1Level1.GridView.Controller).FocusedRecord;
      TcxGridMasterDataRow(ARecord).Expand(True);
      Self.cxgrdbndtblvwcxgrd1DBBandedTableView1.DataController.GotoNext;
      i := i +1;
      Application.ProcessMessages;
     end;
     Self.cxgrdbndtblvwcxgrd1DBBandedTableView1.DataController.GotoFirst;
end;
8
  • Self. - тут использовать не нужно. Application.ProcessMessages; - плохая идея. cxgrdbndtblvwcxgrd1DBBandedTableView1 - ну и имя у объекта.. язык сломаешь. Почему while а не просто for to ?
    – Kromster
    9 фев 2016 в 12:58
  • почему Application.ProcessMessages; плохая идея? согласен, имя ужасное, так, что уже испровляю! а self что бы перестраховаться. между while..do и for .. to разницы в быстродействии есть? (Junior)
    – djoni
    9 фев 2016 в 13:19
  • for to лаконичнее на 2 строки и прямолинейнее в своей цели. Application.ProcessMessages; - простой пример, что случится если во время обработки пользователь нажмет на крестик закрытия программы? или поменяет выбранную строку? или 100500 других вещей которые он может сделать?
    – Kromster
    9 фев 2016 в 13:40
  • @KromStern может можно как то оптимизировать это? записей много и развертывание уровня занимает около минуты. Вот например если развернуть группы gr1.tableview1.DataController.Groups.FullExpand;, то обрабатывает мгновенно.
    – djoni
    15 фев 2016 в 11:25
  • Не помню точно, но если у вашего cxgrdbndtblvwcxgrd1DBBandedTableView1.DataController есть BeginUpdate / EndUpdate, то они могут все очень сильно ускорить.
    – Kromster
    15 фев 2016 в 11:42
0
var ARecord: TcxCustomGridRecord;
i : Integer;
begin
     for I := 1 to Self.odsbs.RecordCount do
       begin
        ARecord := TcxGridTableController(grGrid1Level1.GridView.Controller).FocusedRecord;
        TcxGridMasterDataRow(ARecord).Expand(True);
         Self.grTableViewBSD.DataController.GotoNext;
       end;
       Self.grTableViewBSD.DataController.GotoFirst;
end;
0
0
Self.grTableViewBSD.DataController.BeginUpdate;
Self.grTableViewBSD.ViewData.Expand(True);
Self.grTableViewBSD.DataController.EndUpdate;
self.grTableViewBSD.DataController.GotoFirst;
1
  • Вот пример без цикла.
    – djoni
    15 мар 2016 в 11:58
0

Самый простой способ - это вызвать ViewData.Expand метод с параметром False: GridView.ViewData.Expand(False);

Ваш ответ

By clicking “Отправить ответ”, you agree to our terms of service and acknowledge that you have read and understand our privacy policy and code of conduct.

Всё ещё ищете ответ? Посмотрите другие вопросы с метками или задайте свой вопрос.