DevExpress: Expand/Collapse Button fehlen?

[haentschman]

Moin...:P

Ich habe schon einige Grids mit Gruppierungen (Unbound Grid) gemacht. (Bild1) Jetzt wollte ich ein "altes" DBGrid gruppieren (Bild2)... Die Gruppierung ist schon in Ordnung. Aber die Buttons für Expand/Collapse fehlen. :shock:

Helft mir die Einstellung zu finden...:oops:

PS: Die Properties der Grids sind indentisch bis auf den Group Footer. (Bild3)
PS: Die Tante gibt mir nur Einträge <> VCL
PS: dcoGroupsAlwaysExpanded = True

Danke

Lösung:
1. dcoGroupsAlwaysExpanded = False
Was auch immer die Visualisierung/Gruppierung im DataController zu suchen hat...:roll:
2. Expand Level 1 der Gruppierung
3. Bild Neu

Delphi-Quellcode:

class procedure TToolsDevExpress.ExpandLevel(View: TcxGridTableView; Level: Integer; State: Boolean);
var
  I: Integer;
begin
  View.BeginUpdate;
  try
    View.DataController.Groups.FullExpand;
    for I := View.DataController.RowCount - 1 downto 0 do
    begin
      if View.DataController.GetRowInfo(I).Level = Level then
      begin
        View.DataController.Groups.ChangeExpanding(I, not State, True);
      end;
    end;
  finally
    View.EndUpdate;
  end;
end;

...schön daß wir drüber gesprochen haben. :lol:

[Sinspin]

Du hast es ja schon selber gefunden.

Aber, abgesehen davon dass Du "GroupByBox" auf true setzen musst, muss da eigentlich nichts angepasst werden.
Ohne GroupByBox geht halt nur via Quelltext festzulegen wie gruppiert werden soll.