Sorry, ich habe auf DevExpress SupportCenter eine Lösung gefunden.
So geht´s.
Delphi-Quellcode:
var
AGridSite: TcxGridSite;
AGrid: TcxGrid;
AView: TcxCustomGridView;
begin
if (ActiveControl is TcxGridSite) then
begin
AGridSite := ActiveControl as TcxGridSite;
AGrid := AGridSite.Parent as TcxGrid;
AView := AGridSite.GridView;
AView.PatternGridView.StoreToIniFile( dm1.LayoutIni, false, [] );
end;