Moin...
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.
Helft mir die Einstellung zu finden...
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...
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.
