急:怎么用代码把分组的TcxGrid里分组项全部展开?

Question

我每次刷新一下数据它又自动合拢了,真是烦,要我手工展开.
怎么用代码实现呢?

Answer 1

dxTreeList的Node有Expand方法的，我不知道cx有没有相关的方法，呵呵

Answer 2

最简单的办法有两个，有个内置方法，我不记得了，抱歉，我得找找
另外一个方法就是你编历一次记录集即可；datasource1.dataset :=nil;
table1.first;
while not table1.eof do
  table1.next;
datasource1.dataset := table1;

Answer 3

cx虽然很强大，不过用起来还是有很多不爽的地方，跟dx系列基本上没有共通的地方，我都怀疑是不是同一个公司做的了，呵呵

Answer 4

procedure TfrmSDISubFunMain.ReExpandView;
var
  i: Integer;
begin
  for I := 0 to ComponentCount - 1 do    // Iterate
  begin
    if Components[i] is TCxGridDBTableView then
       (Components[i] As TcxGridDBTableView).ViewData.Expand(True);
  end;    // for
  inherited;
end;

Answer 5

cxGrid1DBTableView1.ViewData.Expand(true);

Answer 6

cxGrid1DBTableView1.ViewData.Collapse(true);  //收缩