Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi DevExpress: Expand/Collapse Button fehlen? (https://www.delphipraxis.net/208855-devexpress-expand-collapse-button-fehlen.html)

haentschman 22. Sep 2021 07:18


DevExpress: Expand/Collapse Button fehlen?
 
Liste der Anhänge anzeigen (Anzahl: 4)
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 22. Sep 2021 09:46

AW: DevExpress: Expand/Collapse Button fehlen?
 
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.


Alle Zeitangaben in WEZ +1. Es ist jetzt 06:49 Uhr.

Powered by vBulletin® Copyright ©2000 - 2021, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2021 by Daniel R. Wolf